home *** CD-ROM | disk | FTP | other *** search
open in:
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: Mailbox/MIME Entity
(archive/mbox).
Confidence | Program | Detection | Match Type | Support
|
---|
10%
| dexvert
| Mailbox/MIME Entity (archive/mbox)
| magic
| Supported |
1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
100%
| file
| data
| default
| |
100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
100%
| detectItEasy
| Format: Plain text[LF]
| default
| |
100%
| xdgMime
| message/rfc822
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 53 75 62 6a 65 63 74 3a | 20 20 76 30 38 69 30 31 |Subject:| v08i01|
|00000010| 34 3a 20 20 41 20 4d 69 | 63 72 6f 2d 45 6d 61 63 |4: A Mi|cro-Emac|
|00000020| 73 20 76 61 72 69 61 6e | 74 20 74 68 61 74 20 72 |s varian|t that r|
|00000030| 65 73 65 6d 62 6c 65 73 | 20 47 4e 55 20 45 6d 61 |esembles| GNU Ema|
|00000040| 63 73 0a 4e 65 77 73 67 | 72 6f 75 70 73 3a 20 6d |cs.Newsg|roups: m|
|00000050| 6f 64 2e 73 6f 75 72 63 | 65 73 0a 41 70 70 72 6f |od.sourc|es.Appro|
|00000060| 76 65 64 3a 20 6d 69 72 | 72 6f 72 21 72 73 0a 0a |ved: mir|ror!rs..|
|00000070| 53 75 62 6d 69 74 74 65 | 64 20 62 79 3a 20 42 6f |Submitte|d by: Bo|
|00000080| 62 20 4c 61 72 73 6f 6e | 20 3c 73 65 69 73 6d 6f |b Larson| <seismo|
|00000090| 21 75 73 63 2d 6f 62 65 | 72 6f 6e 21 62 6c 61 72 |!usc-obe|ron!blar|
|000000a0| 73 6f 6e 3e 0a 4d 6f 64 | 2e 73 6f 75 72 63 65 73 |son>.Mod|.sources|
|000000b0| 3a 20 56 6f 6c 75 6d 65 | 20 38 2c 20 49 73 73 75 |: Volume| 8, Issu|
|000000c0| 65 20 31 34 0a 41 72 63 | 68 69 76 65 2d 6e 61 6d |e 14.Arc|hive-nam|
|000000d0| 65 3a 20 6d 69 63 72 6f | 67 6e 75 2f 50 61 72 74 |e: micro|gnu/Part|
|000000e0| 30 37 0a 0a 0a 23 21 20 | 2f 62 69 6e 2f 73 68 0a |07...#! |/bin/sh.|
|000000f0| 23 20 54 68 69 73 20 69 | 73 20 61 20 73 68 65 6c |# This i|s a shel|
|00000100| 6c 20 61 72 63 68 69 76 | 65 2c 20 6d 65 61 6e 69 |l archiv|e, meani|
|00000110| 6e 67 3a 0a 23 20 31 2e | 20 52 65 6d 6f 76 65 20 |ng:.# 1.| Remove |
|00000120| 65 76 65 72 79 74 68 69 | 6e 67 20 61 62 6f 76 65 |everythi|ng above|
|00000130| 20 74 68 65 20 23 21 20 | 2f 62 69 6e 2f 73 68 20 | the #! |/bin/sh |
|00000140| 6c 69 6e 65 2e 0a 23 20 | 32 2e 20 53 61 76 65 20 |line..# |2. Save |
|00000150| 74 68 65 20 72 65 73 75 | 6c 74 69 6e 67 20 74 65 |the resu|lting te|
|00000160| 78 74 20 69 6e 20 61 20 | 66 69 6c 65 2e 0a 23 20 |xt in a |file..# |
|00000170| 33 2e 20 45 78 65 63 75 | 74 65 20 74 68 65 20 66 |3. Execu|te the f|
|00000180| 69 6c 65 20 77 69 74 68 | 20 2f 62 69 6e 2f 73 68 |ile with| /bin/sh|
|00000190| 20 28 6e 6f 74 20 63 73 | 68 29 20 74 6f 20 63 72 | (not cs|h) to cr|
|000001a0| 65 61 74 65 20 74 68 65 | 20 66 69 6c 65 73 3a 0a |eate the| files:.|
|000001b0| 23 09 74 74 79 2f 61 6d | 69 67 61 2f 74 74 79 6b |#.tty/am|iga/ttyk|
|000001c0| 62 64 2e 63 0a 23 09 74 | 74 79 2f 61 6d 69 67 61 |bd.c.#.t|ty/amiga|
|000001d0| 2f 74 74 79 6d 6f 75 73 | 65 2e 63 0a 23 09 73 79 |/ttymous|e.c.#.sy|
|000001e0| 73 2f 61 6d 69 67 61 2f | 4d 61 6b 65 66 69 6c 65 |s/amiga/|Makefile|
|000001f0| 2e 4c 41 54 54 49 43 45 | 0a 23 09 73 79 73 2f 61 |.LATTICE|.#.sys/a|
|00000200| 6d 69 67 61 2f 4d 61 6b | 65 66 69 6c 65 2e 4d 41 |miga/Mak|efile.MA|
|00000210| 4e 58 0a 23 09 73 79 73 | 2f 61 6d 69 67 61 2f 61 |NX.#.sys|/amiga/a|
|00000220| 6d 69 67 61 2e 64 6f 63 | 0a 23 09 73 79 73 2f 61 |miga.doc|.#.sys/a|
|00000230| 6d 69 67 61 2f 66 69 6c | 65 69 6f 2e 63 0a 23 09 |miga/fil|eio.c.#.|
|00000240| 73 79 73 2f 61 6d 69 67 | 61 2f 73 6c 65 65 70 2e |sys/amig|a/sleep.|
|00000250| 63 0a 23 09 73 79 73 2f | 61 6d 69 67 61 2f 73 70 |c.#.sys/|amiga/sp|
|00000260| 61 77 6e 2e 63 0a 23 09 | 73 79 73 2f 61 6d 69 67 |awn.c.#.|sys/amig|
|00000270| 61 2f 73 79 73 64 65 66 | 2e 68 0a 23 09 73 79 73 |a/sysdef|.h.#.sys|
|00000280| 2f 61 6d 69 67 61 2f 76 | 61 72 61 72 67 73 2e 68 |/amiga/v|arargs.h|
|00000290| 0a 23 20 54 68 69 73 20 | 61 72 63 68 69 76 65 20 |.# This |archive |
|000002a0| 63 72 65 61 74 65 64 3a | 20 53 61 74 20 4e 6f 76 |created:| Sat Nov|
|000002b0| 20 31 35 20 31 35 3a 33 | 34 3a 34 35 20 31 39 38 | 15 15:3|4:45 198|
|000002c0| 36 0a 65 78 70 6f 72 74 | 20 50 41 54 48 3b 20 50 |6.export| PATH; P|
|000002d0| 41 54 48 3d 2f 62 69 6e | 3a 24 50 41 54 48 0a 69 |ATH=/bin|:$PATH.i|
|000002e0| 66 20 74 65 73 74 20 2d | 66 20 27 74 74 79 2f 61 |f test -|f 'tty/a|
|000002f0| 6d 69 67 61 2f 74 74 79 | 6b 62 64 2e 63 27 0a 74 |miga/tty|kbd.c'.t|
|00000300| 68 65 6e 0a 09 65 63 68 | 6f 20 73 68 61 72 3a 20 |hen..ech|o shar: |
|00000310| 77 69 6c 6c 20 6e 6f 74 | 20 6f 76 65 72 2d 77 72 |will not| over-wr|
|00000320| 69 74 65 20 65 78 69 73 | 74 69 6e 67 20 66 69 6c |ite exis|ting fil|
|00000330| 65 20 22 27 74 74 79 2f | 61 6d 69 67 61 2f 74 74 |e "'tty/|amiga/tt|
|00000340| 79 6b 62 64 2e 63 27 22 | 0a 65 6c 73 65 0a 63 61 |ykbd.c'"|.else.ca|
|00000350| 74 20 3c 3c 20 5c 53 48 | 41 52 5f 45 4f 46 20 3e |t << \SH|AR_EOF >|
|00000360| 20 27 74 74 79 2f 61 6d | 69 67 61 2f 74 74 79 6b | 'tty/am|iga/ttyk|
|00000370| 62 64 2e 63 27 0a 2f 2a | 0a 20 2a 20 4e 61 6d 65 |bd.c'./*|. * Name|
|00000380| 3a 09 4d 69 63 72 6f 45 | 4d 41 43 53 0a 20 2a 20 |:.MicroE|MACS. * |
|00000390| 09 09 41 6d 69 67 61 20 | 76 69 72 74 75 61 6c 20 |..Amiga |virtual |
|000003a0| 74 65 72 6d 69 6e 61 6c | 20 6b 65 79 62 6f 61 72 |terminal| keyboar|
|000003b0| 64 2c 20 64 65 66 61 75 | 6c 74 20 63 6f 6e 73 6f |d, defau|lt conso|
|000003c0| 6c 65 20 6b 65 79 6d 61 | 70 2e 0a 20 2a 20 56 65 |le keyma|p.. * Ve|
|000003d0| 72 73 69 6f 6e 3a 09 47 | 6e 75 20 76 33 30 0a 20 |rsion:.G|nu v30. |
|000003e0| 2a 20 4c 61 73 74 20 65 | 64 69 74 3a 09 32 35 2d |* Last e|dit:.25-|
|000003f0| 4f 63 74 2d 38 36 0a 20 | 2a 20 43 72 65 61 74 65 |Oct-86. |* Create|
|00000400| 64 3a 09 31 39 2d 41 70 | 72 2d 38 36 20 2e 2e 2e |d:.19-Ap|r-86 ...|
|00000410| 21 69 68 6e 70 34 21 73 | 65 69 73 6d 6f 21 75 74 |!ihnp4!s|eismo!ut|
|00000420| 2d 73 61 6c 6c 79 21 75 | 74 2d 6e 67 70 21 6d 69 |-sally!u|t-ngp!mi|
|00000430| 63 0a 20 2a 09 09 54 68 | 69 73 20 67 6f 65 73 20 |c. *..Th|is goes |
|00000440| 77 69 74 68 20 74 68 65 | 20 49 6e 74 75 69 74 69 |with the| Intuiti|
|00000450| 6f 6e 20 74 65 72 6d 69 | 6e 61 6c 20 64 72 69 76 |on termi|nal driv|
|00000460| 65 72 2c 0a 20 2a 09 09 | 61 6e 64 20 69 6d 70 6c |er,. *..|and impl|
|00000470| 65 6d 65 6e 74 73 20 4d | 69 6b 65 20 4d 65 79 65 |ements M|ike Meye|
|00000480| 72 27 73 20 68 6f 74 20 | 6d 6f 75 73 65 2e 0a 20 |r's hot |mouse.. |
|00000490| 2a 2f 0a 23 69 6e 63 6c | 75 64 65 09 3c 65 78 65 |*/.#incl|ude.<exe|
|000004a0| 63 2f 74 79 70 65 73 2e | 68 3e 0a 23 69 6e 63 6c |c/types.|h>.#incl|
|000004b0| 75 64 65 09 3c 69 6e 74 | 75 69 74 69 6f 6e 2f 69 |ude.<int|uition/i|
|000004c0| 6e 74 75 69 74 69 6f 6e | 2e 68 3e 0a 23 75 6e 64 |ntuition|.h>.#und|
|000004d0| 65 66 09 54 52 55 45 0a | 23 75 6e 64 65 66 09 46 |ef.TRUE.|#undef.F|
|000004e0| 41 4c 53 45 0a 23 69 6e | 63 6c 75 64 65 09 22 64 |ALSE.#in|clude."d|
|000004f0| 65 66 2e 68 22 0a 0a 23 | 64 65 66 69 6e 65 09 45 |ef.h"..#|define.E|
|00000500| 53 43 09 30 78 31 42 09 | 09 09 2f 2a 20 45 73 63 |SC.0x1B.|../* Esc|
|00000510| 61 70 65 2c 20 61 72 72 | 6f 77 73 20 65 74 20 61 |ape, arr|ows et a|
|00000520| 6c 2e 09 2a 2f 0a 23 64 | 65 66 69 6e 65 09 43 53 |l..*/.#d|efine.CS|
|00000530| 49 09 30 78 39 42 09 09 | 09 2f 2a 20 41 6d 69 67 |I.0x9B..|./* Amig|
|00000540| 61 20 43 53 49 09 09 09 | 2a 2f 0a 0a 23 69 66 64 |a CSI...|*/..#ifd|
|00000550| 65 66 09 4d 4f 55 53 45 | 0a 2f 2a 20 53 74 75 66 |ef.MOUSE|./* Stuf|
|00000560| 66 20 66 6f 72 20 74 68 | 65 20 68 6f 74 20 6d 6f |f for th|e hot mo|
|00000570| 75 73 65 2e 20 20 53 69 | 6e 63 65 20 72 69 67 68 |use. Si|nce righ|
|00000580| 74 20 6e 6f 77 20 74 68 | 65 20 6d 6f 75 73 65 0a |t now th|e mouse.|
|00000590| 20 2a 20 6b 65 79 73 20 | 67 65 74 20 62 6f 75 6e | * keys |get boun|
|000005a0| 64 20 69 6e 74 6f 20 61 | 20 77 69 65 72 64 20 70 |d into a| wierd p|
|000005b0| 6c 61 63 65 2c 20 61 20 | 6c 6f 74 20 6f 66 20 74 |lace, a |lot of t|
|000005c0| 68 65 0a 20 2a 20 6a 69 | 67 67 65 72 79 2d 70 6f |he. * ji|ggery-po|
|000005d0| 6b 65 72 79 20 75 70 20 | 68 65 72 65 20 69 73 20 |kery up |here is |
|000005e0| 74 6f 20 6d 61 6b 65 20 | 69 74 20 70 6f 73 73 69 |to make |it possi|
|000005f0| 62 6c 65 0a 20 2a 20 74 | 6f 20 73 68 69 66 74 20 |ble. * t|o shift |
|00000600| 74 68 65 69 72 20 6c 6f | 63 61 74 69 6f 6e 20 69 |their lo|cation i|
|00000610| 6e 20 74 68 65 20 6b 65 | 79 6d 61 70 20 77 69 74 |n the ke|ymap wit|
|00000620| 68 6f 75 74 20 74 6f 6f | 0a 20 2a 20 6d 75 63 68 |hout too|. * much|
|00000630| 20 66 75 73 73 2e 20 20 | 53 6f 72 72 79 20 66 6f | fuss. |Sorry fo|
|00000640| 72 20 74 68 65 20 68 6f | 72 72 69 64 20 6d 61 63 |r the ho|rrid mac|
|00000650| 72 6f 20 6e 61 6d 65 73 | 2e 2e 2e 0a 20 2a 2f 0a |ro names|.... */.|
|00000660| 0a 2f 2a 20 6b 65 79 20 | 63 6f 64 65 20 77 2f 6f |./* key |code w/o|
|00000670| 20 6d 69 6e 69 20 71 75 | 61 6c 69 66 69 65 72 73 | mini qu|alifiers|
|00000680| 20 2a 2f 0a 23 64 65 66 | 69 6e 65 09 57 4d 4f 55 | */.#def|ine.WMOU|
|00000690| 53 45 09 28 28 4b 45 59 | 29 28 4b 43 54 52 4c 20 |SE.((KEY|)(KCTRL |
|000006a0| 7c 20 4b 4d 45 54 41 20 | 7c 20 27 61 27 29 29 0a || KMETA || 'a')).|
|000006b0| 23 64 65 66 69 6e 65 20 | 53 4d 4f 55 53 45 09 28 |#define |SMOUSE.(|
|000006c0| 28 4b 45 59 29 28 4b 43 | 54 52 4c 20 7c 20 4b 4d |(KEY)(KC|TRL | KM|
|000006d0| 45 54 41 20 7c 20 27 69 | 27 29 29 0a 23 64 65 66 |ETA | 'i|')).#def|
|000006e0| 69 6e 65 09 45 4d 4f 55 | 53 45 09 28 28 4b 45 59 |ine.EMOU|SE.((KEY|
|000006f0| 29 28 4b 43 54 52 4c 20 | 7c 20 4b 4d 45 54 41 20 |)(KCTRL || KMETA |
|00000700| 7c 20 27 71 27 29 29 0a | 0a 2f 2a 20 6d 69 6e 69 || 'q')).|./* mini|
|00000710| 20 71 75 61 6c 69 66 69 | 65 72 73 20 2a 2f 0a 23 | qualifi|ers */.#|
|00000720| 64 65 66 69 6e 65 09 53 | 48 46 54 09 31 0a 23 64 |define.S|HFT.1.#d|
|00000730| 65 66 69 6e 65 20 41 4c | 54 09 32 0a 23 64 65 66 |efine AL|T.2.#def|
|00000740| 69 6e 65 20 43 54 52 4c | 09 34 0a 0a 2f 2a 20 6d |ine CTRL|.4../* m|
|00000750| 61 63 72 6f 73 20 74 6f | 20 63 72 65 61 74 65 20 |acros to| create |
|00000760| 71 75 61 6c 69 66 69 65 | 64 20 6b 65 79 20 63 6f |qualifie|d key co|
|00000770| 64 65 73 20 2a 2f 0a 0a | 23 64 65 66 69 6e 65 09 |des */..|#define.|
|00000780| 53 28 6b 29 09 28 6b 20 | 2b 20 53 48 46 54 29 0a |S(k).(k |+ SHFT).|
|00000790| 23 64 65 66 69 6e 65 09 | 41 28 6b 29 09 28 6b 20 |#define.|A(k).(k |
|000007a0| 2b 20 41 4c 54 29 0a 23 | 64 65 66 69 6e 65 09 43 |+ ALT).#|define.C|
|000007b0| 28 6b 29 09 28 6b 20 2b | 20 43 54 52 4c 29 0a 23 |(k).(k +| CTRL).#|
|000007c0| 64 65 66 69 6e 65 09 41 | 53 28 6b 29 09 28 6b 20 |define.A|S(k).(k |
|000007d0| 2b 20 53 48 46 54 20 2b | 20 41 4c 54 29 0a 23 64 |+ SHFT +| ALT).#d|
|000007e0| 65 66 69 6e 65 09 43 53 | 28 6b 29 09 28 6b 20 2b |efine.CS|(k).(k +|
|000007f0| 20 43 54 52 4c 20 2b 20 | 53 48 46 54 29 0a 23 64 | CTRL + |SHFT).#d|
|00000800| 65 66 69 6e 65 09 43 41 | 28 6b 29 09 28 6b 20 2b |efine.CA|(k).(k +|
|00000810| 20 43 54 52 4c 20 2b 20 | 41 4c 54 29 0a 23 64 65 | CTRL + |ALT).#de|
|00000820| 66 69 6e 65 09 43 41 53 | 28 6b 29 09 28 6b 20 2b |fine.CAS|(k).(k +|
|00000830| 20 53 48 46 54 20 2b 20 | 41 4c 54 20 2b 20 43 54 | SHFT + |ALT + CT|
|00000840| 52 4c 29 0a 23 65 6e 64 | 69 66 20 2f 2a 20 69 66 |RL).#end|if /* if|
|00000850| 64 65 66 20 4d 4f 55 53 | 45 20 2a 2f 0a 0a 23 69 |def MOUS|E */..#i|
|00000860| 66 64 65 66 09 58 4b 45 | 59 53 0a 2f 2a 0a 20 2a |fdef.XKE|YS./*. *|
|00000870| 20 54 68 65 20 66 75 6e | 63 74 69 6f 6e 20 6b 65 | The fun|ction ke|
|00000880| 79 73 20 6f 6e 20 74 68 | 65 20 41 6d 69 67 61 20 |ys on th|e Amiga |
|00000890| 73 65 6e 64 20 62 61 63 | 6b 0a 20 2a 20 65 73 63 |send bac|k. * esc|
|000008a0| 61 70 65 20 73 65 71 75 | 65 6e 63 65 73 20 6f 66 |ape sequ|ences of|
|000008b0| 20 74 68 65 20 66 6f 72 | 6d 20 3c 45 53 43 3e 5b | the for|m <ESC>[|
|000008c0| 63 6f 64 65 7e 2c 20 77 | 68 65 72 65 20 63 6f 64 |code~, w|here cod|
|000008d0| 65 0a 20 2a 20 69 73 20 | 61 20 6f 6e 65 20 6f 72 |e. * is |a one or|
|000008e0| 20 74 77 6f 2d 63 68 61 | 72 61 63 74 65 72 20 63 | two-cha|racter c|
|000008f0| 6f 64 65 20 66 6f 72 20 | 74 68 65 20 6b 65 79 2e |ode for |the key.|
|00000900| 20 20 54 6f 20 6d 61 6b | 65 0a 20 2a 20 69 74 20 | To mak|e. * it |
|00000910| 65 61 73 69 65 72 20 74 | 6f 20 64 65 63 6f 64 65 |easier t|o decode|
|00000920| 2c 20 77 65 20 70 6c 61 | 63 65 20 74 68 65 20 69 |, we pla|ce the i|
|00000930| 6e 74 65 72 6e 61 6c 20 | 6b 65 79 20 76 61 6c 75 |nternal |key valu|
|00000940| 65 73 0a 20 2a 20 66 6f | 72 20 74 68 65 73 65 20 |es. * fo|r these |
|00000950| 63 6f 64 65 73 20 69 6e | 20 74 68 69 73 20 74 61 |codes in| this ta|
|00000960| 62 6c 65 2e 0a 20 2a 2f | 0a 0a 73 68 6f 72 74 09 |ble.. */|..short.|
|00000970| 63 6f 6e 73 6f 6c 65 6d | 61 70 5b 5d 20 3d 20 7b |consolem|ap[] = {|
|00000980| 0a 09 4b 46 31 2c 09 09 | 4b 46 32 2c 09 09 4b 46 |..KF1,..|KF2,..KF|
|00000990| 33 2c 09 09 4b 46 34 2c | 0a 09 4b 46 35 2c 09 09 |3,..KF4,|..KF5,..|
|000009a0| 4b 46 36 2c 09 09 4b 46 | 37 2c 09 09 4b 46 38 2c |KF6,..KF|7,..KF8,|
|000009b0| 0a 09 4b 46 39 2c 09 09 | 4b 46 31 30 2c 09 09 4b |..KF9,..|KF10,..K|
|000009c0| 53 46 31 2c 09 09 4b 53 | 46 32 2c 0a 09 4b 53 46 |SF1,..KS|F2,..KSF|
|000009d0| 33 2c 09 09 4b 53 46 34 | 2c 09 09 4b 53 46 35 2c |3,..KSF4|,..KSF5,|
|000009e0| 09 09 4b 53 46 36 2c 0a | 09 4b 53 46 37 2c 09 09 |..KSF6,.|.KSF7,..|
|000009f0| 4b 53 46 38 2c 09 09 4b | 53 46 39 2c 09 09 4b 53 |KSF8,..K|SF9,..KS|
|00000a00| 46 31 30 0a 7d 3b 0a 23 | 64 65 66 69 6e 65 09 4e |F10.};.#|define.N|
|00000a10| 46 55 4e 43 4b 45 59 53 | 20 28 28 73 69 7a 65 6f |FUNCKEYS| ((sizeo|
|00000a20| 66 20 63 6f 6e 73 6f 6c | 65 6d 61 70 29 2f 28 73 |f consol|emap)/(s|
|00000a30| 69 7a 65 6f 66 20 63 6f | 6e 73 6f 6c 65 6d 61 70 |izeof co|nsolemap|
|00000a40| 5b 30 5d 29 29 0a 23 65 | 6e 64 69 66 0a 0a 2f 2a |[0])).#e|ndif../*|
|00000a50| 0a 20 2a 20 4e 61 6d 65 | 73 20 66 6f 72 20 74 68 |. * Name|s for th|
|00000a60| 65 20 6b 65 79 73 20 77 | 69 74 68 20 62 61 73 69 |e keys w|ith basi|
|00000a70| 63 20 6b 65 79 63 6f 64 | 65 0a 20 2a 20 62 65 74 |c keycod|e. * bet|
|00000a80| 77 65 65 6e 20 4b 46 49 | 52 53 54 20 61 6e 64 20 |ween KFI|RST and |
|00000a90| 4b 4c 41 53 54 20 28 69 | 6e 63 6c 75 73 69 76 65 |KLAST (i|nclusive|
|00000aa0| 29 2e 20 54 68 69 73 20 | 69 73 20 75 73 65 64 20 |). This |is used |
|00000ab0| 62 79 0a 20 2a 20 74 68 | 65 20 6b 65 79 20 6e 61 |by. * th|e key na|
|00000ac0| 6d 65 20 72 6f 75 74 69 | 6e 65 20 69 6e 20 22 6b |me routi|ne in "k|
|00000ad0| 62 64 2e 63 22 2e 20 20 | 4b 46 49 52 53 54 20 69 |bd.c". |KFIRST i|
|00000ae0| 73 20 4b 52 41 4e 44 4f | 4d 2c 0a 20 2a 20 77 68 |s KRANDO|M,. * wh|
|00000af0| 69 63 68 20 77 65 20 64 | 6f 6e 27 74 20 62 69 6e |ich we d|on't bin|
|00000b00| 64 20 61 6e 79 74 68 69 | 6e 67 20 75 73 65 66 75 |d anythi|ng usefu|
|00000b10| 6c 20 74 6f 2e 20 20 22 | 54 68 65 20 4d 65 6e 75 |l to. "|The Menu|
|00000b20| 22 20 69 73 0a 20 2a 20 | 73 70 65 63 69 61 6c 3b |" is. * |special;|
|00000b30| 20 77 65 20 69 6d 70 6c | 65 6d 65 6e 74 20 6d 65 | we impl|ement me|
|00000b40| 6e 75 73 20 61 73 20 61 | 6e 6f 74 68 65 72 20 66 |nus as a|nother f|
|00000b50| 75 6e 63 74 69 6f 6e 20 | 6b 65 79 2c 0a 20 2a 20 |unction |key,. * |
|00000b60| 62 75 74 20 74 68 65 72 | 65 20 69 73 6e 27 74 20 |but ther|e isn't |
|00000b70| 72 65 61 6c 6c 79 20 61 | 6e 79 20 22 4d 45 4e 55 |really a|ny "MENU|
|00000b80| 22 20 6b 65 79 20 6f 6e | 20 74 68 65 20 6b 65 79 |" key on| the key|
|00000b90| 62 6f 61 72 64 2e 0a 20 | 2a 20 54 68 65 72 65 20 |board.. |* There |
|00000ba0| 69 73 20 6e 6f 20 73 68 | 69 66 74 65 64 20 76 61 |is no sh|ifted va|
|00000bb0| 6c 75 65 20 66 6f 72 20 | 74 68 65 20 68 65 6c 70 |lue for |the help|
|00000bc0| 20 6b 65 79 2e 20 20 4d | 6f 75 73 65 20 63 6c 69 | key. M|ouse cli|
|00000bd0| 63 6b 73 0a 20 2a 20 68 | 61 76 65 20 62 65 65 6e |cks. * h|ave been|
|00000be0| 20 6d 6f 76 65 64 20 74 | 6f 20 61 20 68 69 74 68 | moved t|o a hith|
|00000bf0| 65 72 74 6f 20 75 6e 75 | 73 65 64 20 70 61 72 74 |erto unu|sed part|
|00000c00| 20 6f 66 20 74 68 65 20 | 6b 65 79 6d 61 70 2e 0a | of the |keymap..|
|00000c10| 20 2a 2f 0a 23 69 66 64 | 65 66 09 44 4f 5f 4d 45 | */.#ifd|ef.DO_ME|
|00000c20| 4e 55 0a 23 64 65 66 69 | 6e 65 20 4d 45 4e 55 4e |NU.#defi|ne MENUN|
|00000c30| 41 4d 45 20 22 54 68 65 | 20 4d 65 6e 75 22 0a 23 |AME "The| Menu".#|
|00000c40| 65 6c 73 65 0a 23 64 65 | 66 69 6e 65 20 4d 45 4e |else.#de|fine MEN|
|00000c50| 55 4e 41 4d 45 20 4e 55 | 4c 4c 0a 23 65 6e 64 69 |UNAME NU|LL.#endi|
|00000c60| 66 0a 0a 63 68 61 72 09 | 2a 6b 65 79 73 74 72 69 |f..char.|*keystri|
|00000c70| 6e 67 73 5b 5d 20 3d 20 | 7b 0a 23 69 66 64 65 66 |ngs[] = |{.#ifdef|
|00000c80| 09 58 4b 45 59 53 0a 09 | 4e 55 4c 4c 2c 09 09 22 |.XKEYS..|NULL,.."|
|00000c90| 46 31 22 2c 09 09 22 46 | 32 22 2c 09 09 22 46 33 |F1",.."F|2",.."F3|
|00000ca0| 22 2c 0a 09 22 46 34 22 | 2c 09 09 22 46 35 22 2c |",.."F4"|,.."F5",|
|00000cb0| 09 09 22 46 36 22 2c 09 | 09 22 46 37 22 2c 0a 09 |.."F6",.|."F7",..|
|00000cc0| 22 46 38 22 2c 09 09 22 | 46 39 22 2c 09 09 22 46 |"F8",.."|F9",.."F|
|00000cd0| 31 30 22 2c 09 09 22 53 | 68 69 66 74 2d 46 31 22 |10",.."S|hift-F1"|
|00000ce0| 2c 0a 09 22 53 68 69 66 | 74 2d 46 32 22 2c 09 22 |,.."Shif|t-F2",."|
|00000cf0| 53 68 69 66 74 2d 46 33 | 22 2c 09 22 53 68 69 66 |Shift-F3|",."Shif|
|00000d00| 74 2d 46 34 22 2c 09 22 | 53 68 69 66 74 2d 46 35 |t-F4",."|Shift-F5|
|00000d10| 22 2c 0a 09 22 53 68 69 | 66 74 2d 46 36 22 2c 09 |",.."Shi|ft-F6",.|
|00000d20| 22 53 68 69 66 74 2d 46 | 37 22 2c 09 22 53 68 69 |"Shift-F|7",."Shi|
|00000d30| 66 74 2d 46 38 22 2c 09 | 22 53 68 69 66 74 2d 46 |ft-F8",.|"Shift-F|
|00000d40| 39 22 2c 0a 09 22 53 68 | 69 66 74 2d 46 31 30 22 |9",.."Sh|ift-F10"|
|00000d50| 2c 09 22 55 70 22 2c 09 | 09 22 53 68 69 66 74 2d |,."Up",.|."Shift-|
|00000d60| 55 70 22 2c 09 22 44 6f | 77 6e 22 2c 0a 09 22 53 |Up",."Do|wn",.."S|
|00000d70| 68 69 66 74 2d 44 6f 77 | 6e 22 2c 09 22 4c 65 66 |hift-Dow|n",."Lef|
|00000d80| 74 22 2c 09 09 22 53 68 | 69 66 74 2d 4c 65 66 74 |t",.."Sh|ift-Left|
|00000d90| 22 2c 09 22 52 69 67 68 | 74 22 2c 0a 09 22 53 68 |",."Righ|t",.."Sh|
|00000da0| 69 66 74 2d 52 69 67 68 | 74 22 2c 09 22 48 65 6c |ift-Righ|t",."Hel|
|00000db0| 70 22 2c 09 09 4d 45 4e | 55 4e 41 4d 45 2c 09 4e |p",..MEN|UNAME,.N|
|00000dc0| 55 4c 4c 0a 23 65 6c 73 | 65 0a 09 4e 55 4c 4c 2c |ULL.#els|e..NULL,|
|00000dd0| 09 09 4e 55 4c 4c 2c 09 | 09 4e 55 4c 4c 2c 09 09 |..NULL,.|.NULL,..|
|00000de0| 4e 55 4c 4c 2c 0a 09 4e | 55 4c 4c 2c 09 09 4e 55 |NULL,..N|ULL,..NU|
|00000df0| 4c 4c 2c 09 09 4e 55 4c | 4c 2c 09 09 4e 55 4c 4c |LL,..NUL|L,..NULL|
|00000e00| 2c 0a 09 4e 55 4c 4c 2c | 09 09 4e 55 4c 4c 2c 09 |,..NULL,|..NULL,.|
|00000e10| 09 4e 55 4c 4c 2c 09 09 | 4e 55 4c 4c 2c 0a 09 4e |.NULL,..|NULL,..N|
|00000e20| 55 4c 4c 2c 09 09 4e 55 | 4c 4c 2c 09 09 4e 55 4c |ULL,..NU|LL,..NUL|
|00000e30| 4c 2c 09 09 4e 55 4c 4c | 2c 0a 09 4e 55 4c 4c 2c |L,..NULL|,..NULL,|
|00000e40| 09 09 4e 55 4c 4c 2c 09 | 09 4e 55 4c 4c 2c 09 09 |..NULL,.|.NULL,..|
|00000e50| 4e 55 4c 4c 2c 0a 09 4e | 55 4c 4c 2c 09 09 4e 55 |NULL,..N|ULL,..NU|
|00000e60| 4c 4c 2c 09 09 4e 55 4c | 4c 2c 09 09 4e 55 4c 4c |LL,..NUL|L,..NULL|
|00000e70| 2c 0a 09 4e 55 4c 4c 2c | 09 09 4e 55 4c 4c 2c 09 |,..NULL,|..NULL,.|
|00000e80| 09 4e 55 4c 4c 2c 09 09 | 4e 55 4c 4c 2c 0a 09 4e |.NULL,..|NULL,..N|
|00000e90| 55 4c 4c 2c 09 09 4e 55 | 4c 4c 2c 09 09 4d 45 4e |ULL,..NU|LL,..MEN|
|00000ea0| 55 4e 41 4d 45 2c 09 4e | 55 4c 4c 0a 23 65 6e 64 |UNAME,.N|ULL.#end|
|00000eb0| 69 66 0a 7d 3b 0a 0a 2f | 2a 0a 20 2a 20 52 65 61 |if.};../|*. * Rea|
|00000ec0| 64 20 69 6e 20 61 20 6b | 65 79 2c 20 64 6f 69 6e |d in a k|ey, doin|
|00000ed0| 67 20 74 68 65 20 6c 6f | 77 20 6c 65 76 65 6c 20 |g the lo|w level |
|00000ee0| 6d 61 70 70 69 6e 67 0a | 20 2a 20 6f 66 20 41 53 |mapping.| * of AS|
|00000ef0| 43 49 49 20 63 6f 64 65 | 20 74 6f 20 31 31 20 62 |CII code| to 11 b|
|00000f00| 69 74 20 63 6f 64 65 2e | 20 54 68 69 73 20 6c 65 |it code.| This le|
|00000f10| 76 65 6c 20 64 65 61 6c | 73 20 77 69 74 68 0a 20 |vel deal|s with. |
|00000f20| 2a 20 6d 61 70 70 69 6e | 67 20 74 68 65 20 73 70 |* mappin|g the sp|
|00000f30| 65 63 69 61 6c 20 6b 65 | 79 73 20 69 6e 74 6f 20 |ecial ke|ys into |
|00000f40| 74 68 65 69 72 20 73 70 | 6f 74 73 20 69 6e 20 74 |their sp|ots in t|
|00000f50| 68 65 20 43 31 0a 20 2a | 20 63 6f 6e 74 72 6f 6c |he C1. *| control|
|00000f60| 20 61 72 65 61 2e 20 54 | 68 65 20 43 30 20 63 6f | area. T|he C0 co|
|00000f70| 6e 74 72 6f 6c 73 20 67 | 6f 20 72 69 67 68 74 20 |ntrols g|o right |
|00000f80| 74 68 72 6f 75 67 68 2c | 20 61 6e 64 0a 20 2a 20 |through,| and. * |
|00000f90| 67 65 74 20 72 65 6d 61 | 70 70 65 64 20 62 79 20 |get rema|pped by |
|00000fa0| 22 67 65 74 6b 65 79 22 | 2e 20 20 52 65 74 75 72 |"getkey"|. Retur|
|00000fb0| 6e 69 6e 67 20 66 75 6e | 63 74 69 6f 6e 20 6b 65 |ning fun|ction ke|
|00000fc0| 79 73 0a 20 2a 20 77 69 | 74 68 20 4b 4d 45 54 41 |ys. * wi|th KMETA|
|00000fd0| 20 73 65 74 20 64 69 73 | 74 69 6e 67 75 69 73 68 | set dis|tinguish|
|00000fe0| 65 73 20 74 68 65 73 65 | 20 6b 65 79 73 20 66 72 |es these| keys fr|
|00000ff0| 6f 6d 20 63 6f 64 65 73 | 0a 20 2a 20 67 65 6e 65 |om codes|. * gene|
|00001000| 72 61 74 65 64 20 62 79 | 20 41 4c 54 2d 69 6e 67 |rated by| ALT-ing|
|00001010| 20 61 20 63 6f 6e 74 72 | 6f 6c 20 6b 65 79 20 28 | a contr|ol key (|
|00001020| 77 68 69 63 68 20 49 20 | 77 61 6e 74 0a 20 2a 20 |which I |want. * |
|00001030| 74 6f 20 68 61 76 65 20 | 6d 61 70 70 65 64 20 69 |to have |mapped i|
|00001040| 6e 20 74 68 65 20 75 73 | 75 61 6c 20 77 61 79 29 |n the us|ual way)|
|00001050| 2e 0a 20 2a 2f 0a 0a 67 | 65 74 6b 62 64 28 29 0a |.. */..g|etkbd().|
|00001060| 7b 0a 09 72 65 67 69 73 | 74 65 72 20 69 6e 74 09 |{..regis|ter int.|
|00001070| 63 3b 0a 23 69 66 64 65 | 66 09 58 4b 45 59 53 0a |c;.#ifde|f.XKEYS.|
|00001080| 09 72 65 67 69 73 74 65 | 72 20 69 6e 74 09 6e 3b |.registe|r int.n;|
|00001090| 0a 23 65 6e 64 69 66 0a | 6c 6f 6f 70 3a 0a 09 63 |.#endif.|loop:..c|
|000010a0| 20 3d 20 74 74 67 65 74 | 63 28 29 3b 0a 09 69 66 | = ttget|c();..if|
|000010b0| 20 28 63 20 3d 3d 20 43 | 53 49 29 20 7b 0a 09 09 | (c == C|SI) {...|
|000010c0| 63 20 3d 20 74 74 67 65 | 74 63 28 29 3b 0a 23 69 |c = ttge|tc();.#i|
|000010d0| 66 64 65 66 09 4d 4f 55 | 53 45 0a 09 09 69 66 20 |fdef.MOU|SE...if |
|000010e0| 28 63 20 3d 3d 20 27 50 | 27 29 20 7b 09 09 09 2f |(c == 'P|') {.../|
|000010f0| 2a 20 6d 6f 75 73 65 20 | 73 65 71 75 65 6e 63 65 |* mouse |sequence|
|00001100| 09 2a 2f 0a 09 09 09 74 | 74 67 65 74 63 28 29 3b |.*/....t|tgetc();|
|00001110| 09 09 2f 2a 20 64 69 73 | 63 61 72 64 20 27 7e 27 |../* dis|card '~'|
|00001120| 09 09 2a 2f 0a 09 09 09 | 72 65 74 75 72 6e 20 28 |..*/....|return (|
|00001130| 4b 43 54 52 4c 20 7c 20 | 67 65 74 6d 6f 75 73 65 |KCTRL | |getmouse|
|00001140| 28 29 29 3b 09 2f 2a 20 | 63 72 65 61 74 65 20 6b |());./* |create k|
|00001150| 65 79 20 63 6f 64 65 09 | 2a 2f 0a 09 09 7d 0a 23 |ey code.|*/...}.#|
|00001160| 65 6e 64 69 66 0a 0a 23 | 69 66 64 65 66 09 44 4f |endif..#|ifdef.DO|
|00001170| 5f 4d 45 4e 55 0a 09 09 | 69 66 20 28 63 20 3d 3d |_MENU...|if (c ==|
|00001180| 20 27 4d 27 29 20 7b 09 | 09 09 2f 2a 20 28 66 61 | 'M') {.|../* (fa|
|00001190| 6b 65 29 20 6d 65 6e 75 | 20 6b 65 79 09 2a 2f 0a |ke) menu| key.*/.|
|000011a0| 09 09 09 74 74 67 65 74 | 63 28 29 3b 09 09 2f 2a |...ttget|c();../*|
|000011b0| 20 64 69 73 63 61 72 64 | 20 27 7e 27 09 09 2a 2f | discard| '~'..*/|
|000011c0| 0a 09 09 09 72 65 74 75 | 72 6e 20 28 4b 43 54 52 |....retu|rn (KCTR|
|000011d0| 4c 20 7c 20 4b 4d 45 4e | 55 29 3b 0a 09 09 7d 0a |L | KMEN|U);...}.|
|000011e0| 23 65 6e 64 69 66 0a 0a | 23 69 66 64 65 66 09 58 |#endif..|#ifdef.X|
|000011f0| 4b 45 59 53 0a 09 09 69 | 66 20 28 63 20 3d 3d 20 |KEYS...i|f (c == |
|00001200| 27 3f 27 29 20 7b 09 09 | 09 2f 2a 20 48 45 4c 50 |'?') {..|./* HELP|
|00001210| 20 6b 65 79 09 09 2a 2f | 0a 09 09 09 74 74 67 65 | key..*/|....ttge|
|00001220| 74 63 28 29 3b 09 09 2f | 2a 20 64 69 73 63 61 72 |tc();../|* discar|
|00001230| 64 20 27 7e 27 09 09 2a | 2f 0a 09 09 09 72 65 74 |d '~'..*|/....ret|
|00001240| 75 72 6e 20 28 4b 43 54 | 52 4c 20 7c 20 4b 48 45 |urn (KCT|RL | KHE|
|00001250| 4c 50 29 3b 0a 09 09 7d | 0a 09 09 2f 2a 20 41 72 |LP);...}|.../* Ar|
|00001260| 72 6f 77 20 6b 65 79 73 | 20 2a 2f 0a 09 09 69 66 |row keys| */...if|
|00001270| 20 28 63 20 3d 3d 20 27 | 41 27 29 0a 09 09 09 72 | (c == '|A')....r|
|00001280| 65 74 75 72 6e 20 28 4b | 43 54 52 4c 20 7c 20 4b |eturn (K|CTRL | K|
|00001290| 55 50 29 3b 0a 09 09 69 | 66 20 28 63 20 3d 3d 20 |UP);...i|f (c == |
|000012a0| 27 42 27 29 0a 09 09 09 | 72 65 74 75 72 6e 20 28 |'B')....|return (|
|000012b0| 4b 43 54 52 4c 20 7c 20 | 4b 44 4f 57 4e 29 3b 0a |KCTRL | |KDOWN);.|
|000012c0| 09 09 69 66 20 28 63 20 | 3d 3d 20 27 43 27 29 0a |..if (c |== 'C').|
|000012d0| 09 09 09 72 65 74 75 72 | 6e 20 28 4b 43 54 52 4c |...retur|n (KCTRL|
|000012e0| 20 7c 20 4b 52 49 47 48 | 54 29 3b 0a 09 09 69 66 | | KRIGH|T);...if|
|000012f0| 20 28 63 20 3d 3d 20 27 | 44 27 29 0a 09 09 09 72 | (c == '|D')....r|
|00001300| 65 74 75 72 6e 20 28 4b | 43 54 52 4c 20 7c 20 4b |eturn (K|CTRL | K|
|00001310| 4c 45 46 54 29 3b 0a 09 | 09 69 66 20 28 63 20 3d |LEFT);..|.if (c =|
|00001320| 3d 20 27 54 27 29 0a 09 | 09 09 72 65 74 75 72 6e |= 'T')..|..return|
|00001330| 20 28 4b 43 54 52 4c 20 | 7c 20 4b 53 55 50 29 3b | (KCTRL || KSUP);|
|00001340| 0a 09 09 69 66 20 28 63 | 20 3d 3d 20 27 53 27 29 |...if (c| == 'S')|
|00001350| 0a 09 09 09 72 65 74 75 | 72 6e 20 28 4b 43 54 52 |....retu|rn (KCTR|
|00001360| 4c 20 7c 20 4b 53 44 4f | 57 4e 29 3b 0a 09 09 2f |L | KSDO|WN);.../|
|00001370| 2a 20 53 68 69 66 74 65 | 64 20 6c 65 66 74 2c 20 |* Shifte|d left, |
|00001380| 72 69 67 68 74 20 61 72 | 72 6f 77 20 2a 2f 0a 09 |right ar|row */..|
|00001390| 09 69 66 20 28 63 20 3d | 3d 20 27 20 27 29 20 7b |.if (c =|= ' ') {|
|000013a0| 0a 09 09 09 63 20 3d 20 | 74 74 67 65 74 63 28 29 |....c = |ttgetc()|
|000013b0| 3b 0a 09 09 09 69 66 20 | 28 63 20 3d 3d 20 27 41 |;....if |(c == 'A|
|000013c0| 27 20 7c 7c 20 63 20 3d | 3d 20 27 40 27 29 0a 09 |' || c =|= '@')..|
|000013d0| 09 09 09 72 65 74 75 72 | 6e 20 28 4b 43 54 52 4c |...retur|n (KCTRL|
|000013e0| 20 7c 20 28 28 63 20 3d | 3d 20 27 41 27 29 20 3f | | ((c =|= 'A') ?|
|000013f0| 0a 09 09 09 09 09 28 4b | 53 4c 45 46 54 29 20 3a |......(K|SLEFT) :|
|00001400| 20 28 4b 53 52 49 47 48 | 54 29 29 29 3b 0a 09 09 | (KSRIGH|T)));...|
|00001410| 09 67 6f 74 6f 20 6c 6f | 6f 70 3b 09 09 2f 2a 20 |.goto lo|op;../* |
|00001420| 74 72 79 20 61 67 61 69 | 6e 2c 20 73 75 63 6b 65 |try agai|n, sucke|
|00001430| 72 20 2a 2f 0a 09 09 7d | 0a 0a 09 09 2f 2a 20 46 |r */...}|..../* F|
|00001440| 75 6e 63 74 69 6f 6e 20 | 6b 65 79 73 09 2a 2f 0a |unction |keys.*/.|
|00001450| 09 09 69 66 20 28 63 20 | 3e 3d 20 27 30 27 20 26 |..if (c |>= '0' &|
|00001460| 26 20 63 20 3c 3d 20 27 | 39 27 29 20 7b 0a 09 09 |& c <= '|9') {...|
|00001470| 09 6e 20 3d 20 30 3b 0a | 09 09 09 64 6f 20 7b 0a |.n = 0;.|...do {.|
|00001480| 09 09 09 09 6e 20 3d 20 | 31 30 2a 6e 20 2b 20 63 |....n = |10*n + c|
|00001490| 20 2d 20 27 30 27 3b 0a | 09 09 09 09 63 20 3d 20 | - '0';.|....c = |
|000014a0| 74 74 67 65 74 63 28 29 | 3b 0a 09 09 09 7d 20 77 |ttgetc()|;....} w|
|000014b0| 68 69 6c 65 20 28 63 3e | 3d 27 30 27 20 26 26 20 |hile (c>|='0' && |
|000014c0| 63 3c 3d 27 39 27 29 3b | 0a 09 09 09 69 66 20 28 |c<='9');|....if (|
|000014d0| 63 20 3d 3d 20 27 7e 27 | 20 26 26 20 6e 20 3c 20 |c == '~'| && n < |
|000014e0| 4e 46 55 4e 43 4b 45 59 | 53 29 20 7b 0a 09 09 09 |NFUNCKEY|S) {....|
|000014f0| 09 63 20 3d 20 63 6f 6e | 73 6f 6c 65 6d 61 70 5b |.c = con|solemap[|
|00001500| 6e 5d 3b 0a 09 09 09 09 | 69 66 20 28 63 20 21 3d |n];.....|if (c !=|
|00001510| 20 4b 52 41 4e 44 4f 4d | 29 0a 09 09 09 09 09 72 | KRANDOM|)......r|
|00001520| 65 74 75 72 6e 20 28 4b | 43 54 52 4c 20 7c 20 63 |eturn (K|CTRL | c|
|00001530| 29 3b 0a 09 09 09 09 67 | 6f 74 6f 20 6c 6f 6f 70 |);.....g|oto loop|
|00001540| 3b 0a 09 09 09 7d 0a 09 | 09 09 65 6c 73 65 20 0a |;....}..|..else .|
|00001550| 09 09 09 09 67 6f 74 6f | 20 6c 6f 6f 70 3b 09 2f |....goto| loop;./|
|00001560| 2a 20 54 72 79 20 61 67 | 61 69 6e 20 2a 2f 0a 09 |* Try ag|ain */..|
|00001570| 09 7d 0a 23 65 6e 64 69 | 66 0a 09 09 67 6f 74 6f |.}.#endi|f...goto|
|00001580| 20 6c 6f 6f 70 3b 09 09 | 2f 2a 20 54 72 79 20 61 | loop;..|/* Try a|
|00001590| 67 61 69 6e 20 2a 2f 0a | 09 7d 0a 09 72 65 74 75 |gain */.|.}..retu|
|000015a0| 72 6e 20 28 63 29 3b 0a | 7d 0a 0a 23 69 66 64 65 |rn (c);.|}..#ifde|
|000015b0| 66 09 4d 4f 55 53 45 0a | 2f 2a 0a 20 2a 20 41 20 |f.MOUSE.|/*. * A |
|000015c0| 68 61 63 6b 20 66 6f 72 | 20 74 68 65 20 68 6f 74 |hack for| the hot|
|000015d0| 20 6d 6f 75 73 65 20 2d | 2d 20 70 65 65 6b 20 61 | mouse -|- peek a|
|000015e0| 68 65 61 64 20 61 74 20 | 74 68 65 0a 20 2a 20 6e |head at |the. * n|
|000015f0| 65 78 74 20 6d 6f 75 73 | 65 20 65 76 65 6e 74 20 |ext mous|e event |
|00001600| 61 6e 64 20 63 6f 6e 73 | 74 72 75 63 74 20 61 6e |and cons|truct an|
|00001610| 20 69 6e 74 65 72 6e 61 | 6c 20 6b 65 79 0a 20 2a | interna|l key. *|
|00001620| 20 63 6f 64 65 2e 20 20 | 4d 69 67 68 74 20 61 73 | code. |Might as|
|00001630| 20 77 65 6c 6c 20 75 73 | 65 20 74 68 6f 73 65 20 | well us|e those |
|00001640| 65 78 74 72 61 20 62 69 | 6e 64 69 6e 67 20 73 6c |extra bi|nding sl|
|00001650| 6f 74 73 2e 2e 2e 0a 20 | 2a 2f 0a 0a 67 65 74 6d |ots.... |*/..getm|
|00001660| 6f 75 73 65 28 29 0a 7b | 0a 09 55 53 48 4f 52 54 |ouse().{|..USHORT|
|00001670| 09 09 72 6f 77 2c 20 63 | 6f 6c 2c 20 71 75 61 6c |..row, c|ol, qual|
|00001680| 3b 0a 09 69 6e 74 20 74 | 74 6d 6f 75 73 65 28 29 |;..int t|tmouse()|
|00001690| 3b 0a 09 72 65 67 69 73 | 74 65 72 20 69 6e 74 09 |;..regis|ter int.|
|000016a0| 63 6f 64 65 20 3d 20 30 | 3b 0a 09 72 65 67 69 73 |code = 0|;..regis|
|000016b0| 74 65 72 20 73 74 72 75 | 63 74 20 57 49 4e 44 4f |ter stru|ct WINDO|
|000016c0| 57 20 2a 77 70 3b 0a 0a | 09 74 74 6d 6f 75 73 65 |W *wp;..|.ttmouse|
|000016d0| 28 46 41 4c 53 45 2c 20 | 26 72 6f 77 2c 20 26 63 |(FALSE, |&row, &c|
|000016e0| 6f 6c 2c 20 26 71 75 61 | 6c 29 3b 09 2f 2a 20 6c |ol, &qua|l);./* l|
|000016f0| 6f 6f 6b 20 61 74 20 6d | 6f 75 73 65 20 2a 2f 0a |ook at m|ouse */.|
|00001700| 0a 09 2f 2a 20 77 61 73 | 20 74 68 65 20 63 6c 69 |../* was| the cli|
|00001710| 63 6b 20 69 6e 20 61 20 | 77 69 6e 64 6f 77 20 3f |ck in a |window ?|
|00001720| 3f 3f 09 2a 2f 0a 09 66 | 6f 72 20 28 77 70 20 3d |??.*/..f|or (wp =|
|00001730| 20 77 68 65 61 64 70 3b | 20 77 70 20 21 3d 20 4e | wheadp;| wp != N|
|00001740| 55 4c 4c 3b 20 77 70 20 | 3d 20 77 70 2d 3e 77 5f |ULL; wp |= wp->w_|
|00001750| 77 6e 64 70 29 0a 09 09 | 69 66 20 28 28 72 6f 77 |wndp)...|if ((row|
|00001760| 20 3e 3d 20 77 70 2d 3e | 77 5f 74 6f 70 72 6f 77 | >= wp->|w_toprow|
|00001770| 29 20 26 26 0a 09 09 20 | 20 20 20 28 72 6f 77 20 |) &&... | (row |
|00001780| 3c 3d 20 28 77 70 2d 3e | 77 5f 74 6f 70 72 6f 77 |<= (wp->|w_toprow|
|00001790| 20 2b 20 77 70 2d 3e 77 | 5f 6e 74 72 6f 77 73 29 | + wp->w|_ntrows)|
|000017a0| 29 29 0a 09 09 09 62 72 | 65 61 6b 20 3b 0a 0a 09 |))....br|eak ;...|
|000017b0| 2f 2a 20 66 69 67 75 72 | 65 20 6f 75 74 20 77 68 |/* figur|e out wh|
|000017c0| 61 74 20 61 72 65 61 20 | 74 68 65 20 63 6c 69 63 |at area |the clic|
|000017d0| 6b 20 77 61 73 20 69 6e | 09 09 09 2a 2f 0a 09 69 |k was in|...*/..i|
|000017e0| 66 20 28 77 70 20 3d 3d | 20 4e 55 4c 4c 29 09 09 |f (wp ==| NULL)..|
|000017f0| 09 2f 2a 20 6e 6f 74 20 | 66 6f 75 6e 64 3b 20 61 |./* not |found; a|
|00001800| 73 73 75 6d 65 20 65 63 | 68 6f 20 6c 69 6e 65 09 |ssume ec|ho line.|
|00001810| 2a 2f 0a 09 09 63 6f 64 | 65 20 3d 20 45 4d 4f 55 |*/...cod|e = EMOU|
|00001820| 53 45 3b 0a 09 65 6c 73 | 65 20 69 66 20 28 72 6f |SE;..els|e if (ro|
|00001830| 77 20 3d 3d 20 28 77 70 | 2d 3e 77 5f 74 6f 70 72 |w == (wp|->w_topr|
|00001840| 6f 77 20 2b 20 77 70 2d | 3e 77 5f 6e 74 72 6f 77 |ow + wp-|>w_ntrow|
|00001850| 73 29 29 09 2f 2a 20 73 | 74 61 74 75 73 20 6c 69 |s))./* s|tatus li|
|00001860| 6e 65 09 2a 2f 0a 09 09 | 63 6f 64 65 20 3d 20 53 |ne.*/...|code = S|
|00001870| 4d 4f 55 53 45 3b 0a 09 | 65 6c 73 65 0a 09 09 63 |MOUSE;..|else...c|
|00001880| 6f 64 65 20 3d 20 57 4d | 4f 55 53 45 3b 09 2f 2a |ode = WM|OUSE;./*|
|00001890| 20 63 6c 69 63 6b 20 69 | 6e 20 61 20 77 69 6e 64 | click i|n a wind|
|000018a0| 6f 77 09 09 2a 2f 0a 0a | 09 2f 2a 20 66 69 67 75 |ow..*/..|./* figu|
|000018b0| 72 65 20 6f 75 74 20 27 | 6d 69 6e 69 27 20 71 75 |re out '|mini' qu|
|000018c0| 61 6c 69 66 69 65 72 73 | 20 2d 2d 20 41 44 44 20 |alifiers| -- ADD |
|000018d0| 74 68 65 6d 2c 20 62 65 | 63 61 75 73 65 20 27 61 |them, be|cause 'a|
|000018e0| 27 20 69 73 6e 27 74 09 | 2a 2f 0a 09 2f 2a 20 64 |' isn't.|*/../* d|
|000018f0| 69 76 69 73 69 62 6c 65 | 20 62 79 20 32 2e 2e 2e |ivisible| by 2...|
|00001900| 20 20 54 68 69 73 20 74 | 6f 6f 6b 20 6d 65 20 32 | This t|ook me 2|
|00001910| 20 68 6f 75 72 73 20 74 | 6f 20 72 65 61 6c 69 7a | hours t|o realiz|
|00001920| 65 2e 2e 2e 20 20 20 20 | 20 20 20 09 2a 2f 0a 09 |e... | .*/..|
|00001930| 69 66 20 28 71 75 61 6c | 20 26 20 28 49 45 51 55 |if (qual| & (IEQU|
|00001940| 41 4c 49 46 49 45 52 5f | 4c 53 48 49 46 54 20 7c |ALIFIER_|LSHIFT ||
|00001950| 20 49 45 51 55 41 4c 49 | 46 49 45 52 5f 52 53 48 | IEQUALI|FIER_RSH|
|00001960| 49 46 54 29 29 0a 09 09 | 63 6f 64 65 20 2b 3d 20 |IFT))...|code += |
|00001970| 53 48 46 54 3b 0a 09 69 | 66 20 28 71 75 61 6c 20 |SHFT;..i|f (qual |
|00001980| 26 20 28 49 45 51 55 41 | 4c 49 46 49 45 52 5f 4c |& (IEQUA|LIFIER_L|
|00001990| 41 4c 54 20 7c 20 49 45 | 51 55 41 4c 49 46 49 45 |ALT | IE|QUALIFIE|
|000019a0| 52 5f 52 41 4c 54 29 29 | 0a 09 09 63 6f 64 65 20 |R_RALT))|...code |
|000019b0| 2b 3d 20 41 4c 54 3b 0a | 09 69 66 20 28 71 75 61 |+= ALT;.|.if (qua|
|000019c0| 6c 20 26 20 49 45 51 55 | 41 4c 49 46 49 45 52 5f |l & IEQU|ALIFIER_|
|000019d0| 43 4f 4e 54 52 4f 4c 29 | 0a 09 09 63 6f 64 65 20 |CONTROL)|...code |
|000019e0| 2b 3d 20 43 54 52 4c 3b | 0a 0a 09 72 65 74 75 72 |+= CTRL;|...retur|
|000019f0| 6e 20 28 63 6f 64 65 29 | 3b 0a 7d 0a 23 65 6e 64 |n (code)|;.}.#end|
|00001a00| 69 66 0a 0a 2f 2a 0a 20 | 2a 20 54 65 72 6d 69 6e |if../*. |* Termin|
|00001a10| 61 6c 20 73 70 65 63 69 | 66 69 63 20 6b 65 79 6d |al speci|fic keym|
|00001a20| 61 70 20 69 6e 69 74 69 | 61 6c 69 7a 61 74 69 6f |ap initi|alizatio|
|00001a30| 6e 2e 0a 20 2a 0a 20 2a | 20 42 69 6e 64 20 61 6c |n.. *. *| Bind al|
|00001a40| 6c 20 6f 66 20 74 68 65 | 20 61 73 73 69 67 6e 65 |l of the| assigne|
|00001a50| 64 20 67 72 61 70 68 69 | 63 73 20 69 6e 20 74 68 |d graphi|cs in th|
|00001a60| 65 0a 20 2a 20 41 6d 69 | 67 61 20 61 6c 74 65 72 |e. * Ami|ga alter|
|00001a70| 6e 61 74 65 20 63 68 61 | 72 61 63 74 65 72 20 73 |nate cha|racter s|
|00001a80| 65 74 20 74 6f 20 73 65 | 6c 66 2d 69 6e 73 65 72 |et to se|lf-inser|
|00001a90| 74 2e 0a 20 2a 0a 20 2a | 20 23 69 66 64 65 66 20 |t.. *. *| #ifdef |
|00001aa0| 58 4b 45 59 53 2c 20 61 | 74 74 61 63 68 20 74 68 |XKEYS, a|ttach th|
|00001ab0| 65 20 73 70 65 63 69 61 | 6c 20 6b 65 79 73 20 74 |e specia|l keys t|
|00001ac0| 6f 20 74 68 65 20 61 70 | 70 72 6f 70 72 69 61 74 |o the ap|propriat|
|00001ad0| 65 0a 20 2a 20 62 75 69 | 6c 74 2d 69 6e 20 66 75 |e. * bui|lt-in fu|
|00001ae0| 6e 63 74 69 6f 6e 73 2e | 0a 20 2a 0a 20 2a 20 23 |nctions.|. *. * #|
|00001af0| 69 66 64 65 66 20 44 4f | 5f 4d 45 4e 55 2c 20 62 |ifdef DO|_MENU, b|
|00001b00| 69 6e 64 20 74 68 65 20 | 66 61 6b 65 20 4b 4d 45 |ind the |fake KME|
|00001b10| 4e 55 20 63 6f 64 65 20 | 74 6f 20 61 6d 69 67 61 |NU code |to amiga|
|00001b20| 6d 65 6e 75 28 29 0a 20 | 2a 20 74 6f 20 64 6f 20 |menu(). |* to do |
|00001b30| 6d 65 6e 75 20 73 65 6c | 65 63 74 69 6f 6e 20 61 |menu sel|ection a|
|00001b40| 73 20 74 72 61 6e 73 70 | 61 72 65 6e 74 6c 79 20 |s transp|arently |
|00001b50| 61 73 20 70 6f 73 73 69 | 62 6c 65 2e 0a 20 2a 0a |as possi|ble.. *.|
|00001b60| 20 2a 20 23 69 66 64 65 | 66 20 4d 4f 55 53 45 2c | * #ifde|f MOUSE,|
|00001b70| 20 62 69 6e 64 20 74 68 | 65 20 68 6f 74 20 6d 6f | bind th|e hot mo|
|00001b80| 75 73 65 20 6b 65 79 73 | 20 74 6f 20 74 68 65 0a |use keys| to the.|
|00001b90| 20 2a 20 66 75 6e 63 74 | 69 6f 6e 73 2e 20 49 6e | * funct|ions. In|
|00001ba0| 20 74 68 65 20 63 61 73 | 65 20 6f 66 20 77 69 6e | the cas|e of win|
|00001bb0| 64 6f 77 20 61 6e 64 20 | 6d 6f 64 65 20 6c 69 6e |dow and |mode lin|
|00001bc0| 65 0a 20 2a 20 73 65 6c | 65 63 74 69 6f 6e 73 2c |e. * sel|ections,|
|00001bd0| 20 63 61 6c 6c 20 73 70 | 65 63 69 61 6c 20 66 75 | call sp|ecial fu|
|00001be0| 6e 63 74 69 6f 6e 73 0a | 20 2a 20 73 70 65 63 69 |nctions.| * speci|
|00001bf0| 61 6c 20 66 75 6e 63 74 | 69 6f 6e 73 20 74 68 61 |al funct|ions tha|
|00001c00| 74 20 73 65 6c 65 63 74 | 20 74 68 65 20 61 70 70 |t select| the app|
|00001c10| 72 6f 70 72 69 61 74 65 | 0a 20 2a 20 6f 62 6a 65 |ropriate|. * obje|
|00001c20| 63 74 20 28 69 2e 65 2e | 20 63 68 61 72 61 63 74 |ct (i.e.| charact|
|00001c30| 65 72 2c 20 77 69 6e 64 | 6f 77 29 20 62 65 66 6f |er, wind|ow) befo|
|00001c40| 72 65 20 70 65 72 66 6f | 72 6d 69 6e 67 0a 20 2a |re perfo|rming. *|
|00001c50| 20 74 68 65 20 74 61 73 | 6b 2e 0a 20 2a 0a 20 2a | the tas|k.. *. *|
|00001c60| 20 41 73 20 69 73 20 74 | 68 65 20 63 61 73 65 20 | As is t|he case |
|00001c70| 6f 66 20 61 6c 6c 20 74 | 68 65 20 6b 65 79 6d 61 |of all t|he keyma|
|00001c80| 70 20 72 6f 75 74 69 6e | 65 73 2c 20 65 72 72 6f |p routin|es, erro|
|00001c90| 72 73 0a 20 2a 20 72 65 | 73 75 6c 74 20 69 6e 20 |rs. * re|sult in |
|00001ca0| 70 61 6e 69 63 2e 0a 20 | 2a 2f 0a 0a 65 78 74 65 |panic.. |*/..exte|
|00001cb0| 72 6e 09 69 6e 74 09 74 | 6f 67 67 6c 65 77 69 6e |rn.int.t|ogglewin|
|00001cc0| 64 6f 77 28 29 3b 09 09 | 2f 2a 20 44 65 66 69 6e |dow();..|/* Defin|
|00001cd0| 65 64 20 62 79 20 22 74 | 74 79 69 6f 2e 63 22 09 |ed by "t|tyio.c".|
|00001ce0| 09 2a 2f 0a 0a 23 69 66 | 64 65 66 09 44 4f 5f 4d |.*/..#if|def.DO_M|
|00001cf0| 45 4e 55 0a 65 78 74 65 | 72 6e 09 69 6e 74 09 61 |ENU.exte|rn.int.a|
|00001d00| 6d 69 67 61 6d 65 6e 75 | 28 29 3b 09 09 2f 2a 20 |migamenu|();../* |
|00001d10| 44 65 66 69 6e 65 64 20 | 62 79 20 22 74 74 79 6d |Defined |by "ttym|
|00001d20| 65 6e 75 2e 63 22 20 09 | 2a 2f 0a 23 65 6e 64 69 |enu.c" .|*/.#endi|
|00001d30| 66 0a 0a 23 69 66 64 65 | 66 09 43 48 41 4e 47 45 |f..#ifde|f.CHANGE|
|00001d40| 5f 46 4f 4e 54 0a 65 78 | 74 65 72 6e 09 69 6e 74 |_FONT.ex|tern.int|
|00001d50| 09 73 65 74 66 6f 6e 74 | 28 29 3b 09 09 2f 2a 20 |.setfont|();../* |
|00001d60| 44 65 66 69 6e 65 64 20 | 62 79 20 22 74 74 79 69 |Defined |by "ttyi|
|00001d70| 6f 2e 63 22 09 09 2a 2f | 0a 23 65 6e 64 69 66 0a |o.c"..*/|.#endif.|
|00001d80| 0a 23 69 66 64 65 66 09 | 4d 4f 55 53 45 0a 65 78 |.#ifdef.|MOUSE.ex|
|00001d90| 74 65 72 6e 09 69 6e 74 | 09 61 6d 69 67 61 6d 6f |tern.int|.amigamo|
|00001da0| 75 73 65 28 29 3b 09 09 | 2f 2a 20 44 65 66 69 6e |use();..|/* Defin|
|00001db0| 65 64 20 62 79 20 22 74 | 74 79 6d 6f 75 73 65 2e |ed by "t|tymouse.|
|00001dc0| 63 22 09 2a 2f 0a 65 78 | 74 65 72 6e 09 69 6e 74 |c".*/.ex|tern.int|
|00001dd0| 09 6d 72 65 70 6f 73 69 | 74 69 6f 6e 28 29 3b 09 |.mreposi|tion();.|
|00001de0| 09 2f 2a 20 46 75 6e 63 | 74 69 6f 6e 73 20 77 68 |./* Func|tions wh|
|00001df0| 69 63 68 20 73 65 6c 65 | 63 74 20 74 68 65 09 2a |ich sele|ct the.*|
|00001e00| 2f 20 0a 65 78 74 65 72 | 6e 09 69 6e 74 09 6d 64 |/ .exter|n.int.md|
|00001e10| 65 6c 66 77 6f 72 64 28 | 29 3b 09 09 2f 2a 20 77 |elfword(|);../* w|
|00001e20| 69 6e 64 6f 77 20 74 68 | 65 20 63 6c 69 63 6b 20 |indow th|e click |
|00001e30| 77 61 73 20 69 6e 2c 09 | 2a 2f 0a 65 78 74 65 72 |was in,.|*/.exter|
|00001e40| 6e 09 69 6e 74 09 6d 6b | 69 6c 6c 6c 69 6e 65 28 |n.int.mk|illline(|
|00001e50| 29 3b 09 09 2f 2a 20 74 | 68 65 6e 20 63 61 6c 6c |);../* t|hen call|
|00001e60| 20 61 6e 6f 74 68 65 72 | 20 6f 6e 65 09 2a 2f 0a | another| one.*/.|
|00001e70| 65 78 74 65 72 6e 09 69 | 6e 74 09 6d 66 6f 72 77 |extern.i|nt.mforw|
|00001e80| 64 65 6c 28 29 3b 09 09 | 2f 2a 20 44 65 66 69 6e |del();..|/* Defin|
|00001e90| 65 64 20 69 6e 20 22 74 | 74 79 6d 6f 75 73 65 2e |ed in "t|tymouse.|
|00001ea0| 63 22 09 2a 2f 0a 65 78 | 74 65 72 6e 09 69 6e 74 |c".*/.ex|tern.int|
|00001eb0| 09 6d 64 65 6c 77 68 69 | 74 65 28 29 3b 0a 65 78 |.mdelwhi|te();.ex|
|00001ec0| 74 65 72 6e 09 69 6e 74 | 09 6d 6b 69 6c 6c 72 65 |tern.int|.mkillre|
|00001ed0| 67 69 6f 6e 28 29 3b 0a | 65 78 74 65 72 6e 09 69 |gion();.|extern.i|
|00001ee0| 6e 74 09 6d 79 61 6e 6b | 28 29 3b 0a 65 78 74 65 |nt.myank|();.exte|
|00001ef0| 72 6e 09 69 6e 74 09 6d | 66 6f 72 77 70 61 67 65 |rn.int.m|forwpage|
|00001f00| 28 29 3b 0a 65 78 74 65 | 72 6e 09 69 6e 74 09 6d |();.exte|rn.int.m|
|00001f10| 62 61 63 6b 70 61 67 65 | 28 29 3b 0a 65 78 74 65 |backpage|();.exte|
|00001f20| 72 6e 09 69 6e 74 09 6d | 73 70 6c 69 74 77 69 6e |rn.int.m|splitwin|
|00001f30| 64 28 29 3b 0a 65 78 74 | 65 72 6e 09 69 6e 74 09 |d();.ext|ern.int.|
|00001f40| 6d 64 65 6c 77 69 6e 64 | 28 29 3b 0a 65 78 74 65 |mdelwind|();.exte|
|00001f50| 72 6e 09 69 6e 74 09 6d | 67 6f 74 6f 62 6f 62 28 |rn.int.m|gotobob(|
|00001f60| 29 3b 0a 65 78 74 65 72 | 6e 09 69 6e 74 09 6d 67 |);.exter|n.int.mg|
|00001f70| 6f 74 6f 65 6f 62 28 29 | 3b 0a 65 78 74 65 72 6e |otoeob()|;.extern|
|00001f80| 09 69 6e 74 09 6d 65 6e | 6c 61 72 67 65 77 69 6e |.int.men|largewin|
|00001f90| 64 28 29 3b 0a 65 78 74 | 65 72 6e 09 69 6e 74 09 |d();.ext|ern.int.|
|00001fa0| 6d 73 68 72 69 6e 6b 77 | 69 6e 64 28 29 3b 0a 23 |mshrinkw|ind();.#|
|00001fb0| 65 6e 64 69 66 0a 0a 23 | 69 66 64 65 66 09 43 48 |endif..#|ifdef.CH|
|00001fc0| 41 4e 47 45 5f 43 4f 4c | 4f 52 0a 09 2f 2a 20 66 |ANGE_COL|OR../* f|
|00001fd0| 75 6e 63 74 69 6f 6e 73 | 20 74 6f 20 6d 65 73 73 |unctions| to mess|
|00001fe0| 20 77 69 74 68 20 74 68 | 65 20 6d 6f 64 65 20 6c | with th|e mode l|
|00001ff0| 69 6e 65 20 72 65 6e 64 | 69 74 69 6f 6e 2c 20 77 |ine rend|ition, w|
|00002000| 69 6e 64 6f 77 20 63 6f | 6c 6f 72 73 2a 2f 0a 65 |indow co|lors*/.e|
|00002010| 78 74 65 72 6e 09 69 6e | 74 09 74 74 6d 6f 64 65 |xtern.in|t.ttmode|
|00002020| 28 29 3b 09 09 2f 2a 20 | 44 65 66 69 6e 65 64 20 |();../* |Defined |
|00002030| 62 79 20 22 74 74 79 2e | 63 22 09 09 2a 2f 0a 65 |by "tty.|c"..*/.e|
|00002040| 78 74 65 72 6e 09 69 6e | 74 09 74 74 74 65 78 74 |xtern.in|t.tttext|
|00002050| 28 29 3b 09 09 2f 2a 20 | 20 22 22 09 09 09 09 2a |();../* | ""....*|
|00002060| 2f 0a 65 78 74 65 72 6e | 09 69 6e 74 09 74 65 78 |/.extern|.int.tex|
|00002070| 74 66 6f 72 65 67 72 6f | 75 6e 64 28 29 3b 09 2f |tforegro|und();./|
|00002080| 2a 20 20 22 22 09 09 09 | 09 2a 2f 0a 65 78 74 65 |* ""...|.*/.exte|
|00002090| 72 6e 09 69 6e 74 09 74 | 65 78 74 62 61 63 6b 67 |rn.int.t|extbackg|
|000020a0| 72 6f 75 6e 64 28 29 3b | 09 2f 2a 20 20 22 22 09 |round();|./* "".|
|000020b0| 09 09 09 2a 2f 0a 65 78 | 74 65 72 6e 09 69 6e 74 |...*/.ex|tern.int|
|000020c0| 09 6d 6f 64 65 66 6f 72 | 65 67 72 6f 75 6e 64 28 |.modefor|eground(|
|000020d0| 29 3b 09 2f 2a 20 20 22 | 22 09 09 09 09 2a 2f 0a |);./* "|"....*/.|
|000020e0| 65 78 74 65 72 6e 09 69 | 6e 74 09 6d 6f 64 65 62 |extern.i|nt.modeb|
|000020f0| 61 63 6b 67 72 6f 75 6e | 64 28 29 3b 09 2f 2a 20 |ackgroun|d();./* |
|00002100| 20 22 22 09 09 09 09 2a | 2f 0a 23 65 6e 64 69 66 | ""....*|/.#endif|
|00002110| 0a 0a 74 74 79 6b 65 79 | 6d 61 70 69 6e 69 74 28 |..ttykey|mapinit(|
|00002120| 29 0a 7b 0a 09 72 65 67 | 69 73 74 65 72 20 53 59 |).{..reg|ister SY|
|00002130| 4d 42 4f 4c 09 2a 73 70 | 3b 0a 09 72 65 67 69 73 |MBOL.*sp|;..regis|
|00002140| 74 65 72 20 69 6e 74 09 | 69 3b 0a 0a 09 2f 2a 20 |ter int.|i;.../* |
|00002150| 49 6e 74 75 69 74 69 6f | 6e 20 77 69 6e 64 6f 77 |Intuitio|n window|
|00002160| 20 6d 61 6e 69 70 75 6c | 61 74 69 6f 6e 20 09 2a | manipul|ation .*|
|00002170| 2f 0a 0a 23 69 66 6e 64 | 65 66 09 4d 45 59 4e 0a |/..#ifnd|ef.MEYN.|
|00002180| 09 6b 65 79 64 75 70 28 | 28 4b 45 59 29 4b 4d 45 |.keydup(|(KEY)KME|
|00002190| 54 41 7c 4b 43 54 52 4c | 7c 27 4c 27 2c 09 22 72 |TA|KCTRL||'L',."r|
|000021a0| 65 64 72 61 77 2d 64 69 | 73 70 6c 61 79 22 29 3b |edraw-di|splay");|
|000021b0| 0a 23 65 6e 64 69 66 0a | 20 09 6b 65 79 61 64 64 |.#endif.| .keyadd|
|000021c0| 28 28 4b 45 59 29 2d 31 | 2c 09 74 6f 67 67 6c 65 |((KEY)-1|,.toggle|
|000021d0| 77 69 6e 64 6f 77 2c 09 | 22 74 6f 67 67 6c 65 2d |window,.|"toggle-|
|000021e0| 77 69 6e 64 6f 77 2d 68 | 61 63 6b 22 29 3b 0a 0a |window-h|ack");..|
|000021f0| 09 2f 2a 0a 09 20 2a 20 | 42 69 6e 64 20 61 6c 6c |./*.. * |Bind all|
|00002200| 20 70 6f 73 69 74 69 6f | 6e 73 20 74 68 61 74 20 | positio|ns that |
|00002210| 63 6f 72 72 65 73 70 6f | 6e 64 0a 09 20 2a 20 74 |correspo|nd.. * t|
|00002220| 6f 20 63 68 61 72 61 63 | 74 65 72 73 20 69 6e 20 |o charac|ters in |
|00002230| 74 68 65 20 41 6d 69 67 | 61 20 61 6c 74 65 72 6e |the Amig|a altern|
|00002240| 61 74 65 0a 09 20 2a 20 | 63 68 61 72 61 63 74 65 |ate.. * |characte|
|00002250| 72 20 73 65 74 20 74 6f | 20 22 69 6e 73 2d 73 65 |r set to| "ins-se|
|00002260| 6c 66 22 2e 20 54 68 65 | 73 65 20 63 68 61 72 61 |lf". The|se chara|
|00002270| 63 74 65 72 73 20 6d 61 | 79 0a 09 20 2a 20 62 65 |cters ma|y.. * be|
|00002280| 20 75 73 65 64 20 6a 75 | 73 74 20 6c 69 6b 65 20 | used ju|st like |
|00002290| 61 6e 79 20 6f 74 68 65 | 72 20 63 68 61 72 61 63 |any othe|r charac|
|000022a0| 74 65 72 2e 20 20 4f 66 | 20 63 6f 75 72 73 65 2c |ter. Of| course,|
|000022b0| 0a 09 20 2a 20 69 66 20 | 44 4f 5f 4d 45 54 41 4b |.. * if |DO_METAK|
|000022c0| 45 59 20 69 73 20 64 65 | 66 69 6e 65 64 20 69 6e |EY is de|fined in|
|000022d0| 20 6b 62 64 2e 63 2c 20 | 74 68 65 20 61 6c 74 65 | kbd.c, |the alte|
|000022e0| 72 6e 61 74 65 20 63 68 | 61 72 61 63 74 65 72 0a |rnate ch|aracter.|
|000022f0| 09 20 2a 20 73 65 74 20 | 77 69 6c 6c 20 67 65 74 |. * set |will get|
|00002300| 20 6d 61 70 70 65 64 20 | 74 6f 20 4d 45 54 41 2d | mapped |to META-|
|00002310| 65 64 20 6b 65 79 73 2e | 2e 2e 0a 09 20 2a 2f 0a |ed keys.|.... */.|
|00002320| 0a 09 69 66 20 28 28 73 | 70 3d 73 79 6d 6c 6f 6f |..if ((s|p=symloo|
|00002330| 6b 75 70 28 22 73 65 6c | 66 2d 69 6e 73 65 72 74 |kup("sel|f-insert|
|00002340| 2d 63 6f 6d 6d 61 6e 64 | 22 29 29 20 3d 3d 20 4e |-command|")) == N|
|00002350| 55 4c 4c 29 0a 09 09 70 | 61 6e 69 63 28 22 74 74 |ULL)...p|anic("tt|
|00002360| 79 6b 65 79 6d 61 70 69 | 6e 69 74 3a 20 63 61 6e |ykeymapi|nit: can|
|00002370| 27 74 20 66 69 6e 64 20 | 73 65 6c 66 2d 69 6e 73 |'t find |self-ins|
|00002380| 65 72 74 2d 63 6f 6d 6d | 61 6e 64 22 29 3b 0a 09 |ert-comm|and");..|
|00002390| 66 6f 72 20 28 69 3d 30 | 78 41 30 3b 20 69 3c 30 |for (i=0|xA0; i<0|
|000023a0| 78 46 46 3b 20 2b 2b 69 | 29 20 7b 0a 09 09 69 66 |xFF; ++i|) {...if|
|000023b0| 20 28 62 69 6e 64 69 6e | 67 5b 69 5d 20 21 3d 20 | (bindin|g[i] != |
|000023c0| 4e 55 4c 4c 29 0a 09 09 | 09 70 61 6e 69 63 28 22 |NULL)...|.panic("|
|000023d0| 74 74 79 6b 65 79 6d 61 | 70 69 6e 69 74 3a 20 6b |ttykeyma|pinit: k|
|000023e0| 65 79 20 61 6c 72 65 61 | 64 79 20 62 6f 75 6e 64 |ey alrea|dy bound|
|000023f0| 22 29 3b 0a 09 09 62 69 | 6e 64 69 6e 67 5b 69 5d |");...bi|nding[i]|
|00002400| 20 3d 20 73 70 3b 0a 09 | 7d 0a 0a 23 69 66 64 65 | = sp;..|}..#ifde|
|00002410| 66 09 44 4f 5f 4d 45 4e | 55 0a 09 2f 2a 20 22 4d |f.DO_MEN|U../* "M|
|00002420| 65 6e 75 22 20 6b 65 79 | 2c 20 69 66 20 63 6f 6d |enu" key|, if com|
|00002430| 70 69 6c 65 64 20 69 6e | 09 2a 2f 0a 09 6b 65 79 |piled in|.*/..key|
|00002440| 61 64 64 28 28 4b 45 59 | 29 4b 4d 45 4e 55 2c 09 |add((KEY|)KMENU,.|
|00002450| 61 6d 69 67 61 6d 65 6e | 75 2c 09 22 61 6d 69 67 |amigamen|u,."amig|
|00002460| 61 2d 6d 65 6e 75 22 29 | 3b 0a 23 65 6e 64 69 66 |a-menu")|;.#endif|
|00002470| 0a 0a 23 69 66 64 65 66 | 09 43 48 41 4e 47 45 5f |..#ifdef|.CHANGE_|
|00002480| 46 4f 4e 54 0a 09 6b 65 | 79 61 64 64 28 28 4b 45 |FONT..ke|yadd((KE|
|00002490| 59 29 2d 31 2c 09 73 65 | 74 66 6f 6e 74 2c 09 22 |Y)-1,.se|tfont,."|
|000024a0| 73 65 74 2d 66 6f 6e 74 | 22 29 3b 0a 23 65 6e 64 |set-font|");.#end|
|000024b0| 69 66 0a 0a 23 69 66 64 | 65 66 09 43 48 41 4e 47 |if..#ifd|ef.CHANG|
|000024c0| 45 5f 43 4f 4c 4f 52 0a | 09 2f 2a 20 46 75 6e 63 |E_COLOR.|./* Func|
|000024d0| 74 69 6f 6e 73 20 74 6f | 20 61 6c 6c 6f 77 20 79 |tions to| allow y|
|000024e0| 6f 75 20 74 6f 20 63 68 | 61 6e 67 65 20 63 6f 6c |ou to ch|ange col|
|000024f0| 6f 72 73 09 2a 2f 0a 09 | 6b 65 79 61 64 64 28 28 |ors.*/..|keyadd((|
|00002500| 4b 45 59 29 2d 31 2c 20 | 74 74 6d 6f 64 65 2c 09 |KEY)-1, |ttmode,.|
|00002510| 09 22 73 65 74 2d 6d 6f | 64 65 2d 72 65 6e 64 69 |."set-mo|de-rendi|
|00002520| 74 69 6f 6e 22 29 3b 0a | 09 6b 65 79 61 64 64 28 |tion");.|.keyadd(|
|00002530| 28 4b 45 59 29 2d 31 2c | 09 74 74 74 65 78 74 2c |(KEY)-1,|.tttext,|
|00002540| 09 09 22 73 65 74 2d 74 | 65 78 74 2d 72 65 6e 64 |.."set-t|ext-rend|
|00002550| 69 74 69 6f 6e 22 29 3b | 0a 09 6b 65 79 61 64 64 |ition");|..keyadd|
|00002560| 28 28 4b 45 59 29 2d 31 | 2c 09 74 65 78 74 66 6f |((KEY)-1|,.textfo|
|00002570| 72 65 67 72 6f 75 6e 64 | 2c 09 22 73 65 74 2d 74 |reground|,."set-t|
|00002580| 65 78 74 2d 66 6f 72 65 | 67 72 6f 75 6e 64 22 29 |ext-fore|ground")|
|00002590| 3b 0a 09 6b 65 79 61 64 | 64 28 28 4b 45 59 29 2d |;..keyad|d((KEY)-|
|000025a0| 31 2c 09 74 65 78 74 62 | 61 63 6b 67 72 6f 75 6e |1,.textb|ackgroun|
|000025b0| 64 2c 09 22 73 65 74 2d | 74 65 78 74 2d 62 61 63 |d,."set-|text-bac|
|000025c0| 6b 67 72 6f 75 6e 64 22 | 29 3b 0a 09 6b 65 79 61 |kground"|);..keya|
|000025d0| 64 64 28 28 4b 45 59 29 | 2d 31 2c 20 6d 6f 64 65 |dd((KEY)|-1, mode|
|000025e0| 66 6f 72 65 67 72 6f 75 | 6e 64 2c 20 22 73 65 74 |foregrou|nd, "set|
|000025f0| 2d 6d 6f 64 65 2d 66 6f | 72 65 67 72 6f 75 6e 64 |-mode-fo|reground|
|00002600| 22 29 3b 0a 09 6b 65 79 | 61 64 64 28 28 4b 45 59 |");..key|add((KEY|
|00002610| 29 2d 31 2c 09 6d 6f 64 | 65 62 61 63 6b 67 72 6f |)-1,.mod|ebackgro|
|00002620| 75 6e 64 2c 09 22 73 65 | 74 2d 6d 6f 64 65 2d 62 |und,."se|t-mode-b|
|00002630| 61 63 6b 67 72 6f 75 6e | 64 22 29 3b 0a 23 65 6e |ackgroun|d");.#en|
|00002640| 64 69 66 0a 0a 23 69 66 | 64 65 66 09 58 4b 45 59 |dif..#if|def.XKEY|
|00002650| 53 0a 09 2f 2a 20 41 72 | 72 6f 77 20 6b 65 79 73 |S../* Ar|row keys|
|00002660| 09 2a 2f 0a 09 6b 65 79 | 64 75 70 28 28 4b 45 59 |.*/..key|dup((KEY|
|00002670| 29 4b 55 50 2c 09 22 70 | 72 65 76 69 6f 75 73 2d |)KUP,."p|revious-|
|00002680| 6c 69 6e 65 22 29 3b 0a | 09 6b 65 79 64 75 70 28 |line");.|.keydup(|
|00002690| 28 4b 45 59 29 4b 44 4f | 57 4e 2c 09 22 6e 65 78 |(KEY)KDO|WN,."nex|
|000026a0| 74 2d 6c 69 6e 65 22 29 | 3b 0a 0a 09 6b 65 79 64 |t-line")|;...keyd|
|000026b0| 75 70 28 28 4b 45 59 29 | 4b 53 55 50 2c 09 22 62 |up((KEY)|KSUP,."b|
|000026c0| 61 63 6b 77 61 72 64 2d | 70 61 72 61 67 72 61 70 |ackward-|paragrap|
|000026d0| 68 22 29 3b 0a 09 6b 65 | 79 64 75 70 28 28 4b 45 |h");..ke|ydup((KE|
|000026e0| 59 29 4b 53 44 4f 57 4e | 2c 09 22 66 6f 72 77 61 |Y)KSDOWN|,."forwa|
|000026f0| 72 64 2d 70 61 72 61 67 | 72 61 70 68 22 29 3b 09 |rd-parag|raph");.|
|00002700| 0a 0a 09 6b 65 79 64 75 | 70 28 28 4b 45 59 29 4b |...keydu|p((KEY)K|
|00002710| 52 49 47 48 54 2c 09 22 | 66 6f 72 77 61 72 64 2d |RIGHT,."|forward-|
|00002720| 63 68 61 72 22 29 3b 0a | 09 6b 65 79 64 75 70 28 |char");.|.keydup(|
|00002730| 28 4b 45 59 29 4b 4c 45 | 46 54 2c 09 22 62 61 63 |(KEY)KLE|FT,."bac|
|00002740| 6b 77 61 72 64 2d 63 68 | 61 72 22 29 3b 0a 0a 09 |kward-ch|ar");...|
|00002750| 6b 65 79 64 75 70 28 28 | 4b 45 59 29 4b 53 52 49 |keydup((|KEY)KSRI|
|00002760| 47 48 54 2c 09 22 66 6f | 72 77 61 72 64 2d 77 6f |GHT,."fo|rward-wo|
|00002770| 72 64 22 29 3b 0a 09 6b | 65 79 64 75 70 28 28 4b |rd");..k|eydup((K|
|00002780| 45 59 29 4b 53 4c 45 46 | 54 2c 09 22 62 61 63 6b |EY)KSLEF|T,."back|
|00002790| 77 61 72 64 2d 77 6f 72 | 64 22 29 3b 0a 0a 09 2f |ward-wor|d");.../|
|000027a0| 2a 20 46 75 6e 63 74 69 | 6f 6e 20 6b 65 79 73 20 |* Functi|on keys |
|000027b0| 09 2a 2f 0a 09 6b 65 79 | 64 75 70 28 28 4b 45 59 |.*/..key|dup((KEY|
|000027c0| 29 4b 48 45 4c 50 2c 09 | 22 64 65 73 63 72 69 62 |)KHELP,.|"describ|
|000027d0| 65 2d 6b 65 79 2d 62 72 | 69 65 66 6c 79 22 29 3b |e-key-br|iefly");|
|000027e0| 0a 0a 09 6b 65 79 64 75 | 70 28 28 4b 45 59 29 4b |...keydu|p((KEY)K|
|000027f0| 46 31 2c 09 22 66 69 6e | 64 2d 66 69 6c 65 22 29 |F1,."fin|d-file")|
|00002800| 3b 0a 09 6b 65 79 64 75 | 70 28 28 4b 45 59 29 4b |;..keydu|p((KEY)K|
|00002810| 53 46 31 2c 09 22 66 69 | 6e 64 2d 66 69 6c 65 2d |SF1,."fi|nd-file-|
|00002820| 6f 74 68 65 72 2d 77 69 | 6e 64 6f 77 22 29 3b 0a |other-wi|ndow");.|
|00002830| 0a 09 6b 65 79 64 75 70 | 28 28 4b 45 59 29 4b 46 |..keydup|((KEY)KF|
|00002840| 32 2c 09 22 73 61 76 65 | 2d 62 75 66 66 65 72 22 |2,."save|-buffer"|
|00002850| 29 3b 0a 09 6b 65 79 64 | 75 70 28 28 4b 45 59 29 |);..keyd|up((KEY)|
|00002860| 4b 53 46 32 2c 09 22 77 | 72 69 74 65 2d 66 69 6c |KSF2,."w|rite-fil|
|00002870| 65 22 29 3b 0a 0a 09 6b | 65 79 64 75 70 28 28 4b |e");...k|eydup((K|
|00002880| 45 59 29 4b 46 33 2c 09 | 22 73 63 72 6f 6c 6c 2d |EY)KF3,.|"scroll-|
|00002890| 75 70 22 29 3b 0a 09 6b | 65 79 64 75 70 28 28 4b |up");..k|eydup((K|
|000028a0| 45 59 29 4b 53 46 33 2c | 09 22 73 63 72 6f 6c 6c |EY)KSF3,|."scroll|
|000028b0| 2d 64 6f 77 6e 22 29 3b | 0a 0a 09 6b 65 79 64 75 |-down");|...keydu|
|000028c0| 70 28 28 4b 45 59 29 4b | 46 34 2c 09 22 6e 65 78 |p((KEY)K|F4,."nex|
|000028d0| 74 2d 77 69 6e 64 6f 77 | 22 29 3b 0a 09 6b 65 79 |t-window|");..key|
|000028e0| 64 75 70 28 28 4b 45 59 | 29 4b 53 46 34 2c 09 22 |dup((KEY|)KSF4,."|
|000028f0| 70 72 65 76 69 6f 75 73 | 2d 77 69 6e 64 6f 77 22 |previous|-window"|
|00002900| 29 3b 0a 0a 09 6b 65 79 | 64 75 70 28 28 4b 45 59 |);...key|dup((KEY|
|00002910| 29 4b 46 35 2c 09 22 65 | 6e 6c 61 72 67 65 2d 77 |)KF5,."e|nlarge-w|
|00002920| 69 6e 64 6f 77 22 29 3b | 0a 09 6b 65 79 64 75 70 |indow");|..keydup|
|00002930| 28 28 4b 45 59 29 4b 53 | 46 35 2c 09 22 73 68 72 |((KEY)KS|F5,."shr|
|00002940| 69 6e 6b 2d 77 69 6e 64 | 6f 77 22 29 3b 0a 0a 09 |ink-wind|ow");...|
|00002950| 6b 65 79 64 75 70 28 28 | 4b 45 59 29 4b 46 36 2c |keydup((|KEY)KF6,|
|00002960| 09 22 66 69 6c 6c 2d 70 | 61 72 61 67 72 61 70 68 |."fill-p|aragraph|
|00002970| 22 29 3b 0a 09 6b 65 79 | 64 75 70 28 28 4b 45 59 |");..key|dup((KEY|
|00002980| 29 4b 53 46 36 2c 09 22 | 71 75 65 72 79 2d 72 65 |)KSF6,."|query-re|
|00002990| 70 6c 61 63 65 22 29 3b | 0a 0a 09 6b 65 79 64 75 |place");|...keydu|
|000029a0| 70 28 28 4b 45 59 29 4b | 46 37 2c 09 22 73 70 6c |p((KEY)K|F7,."spl|
|000029b0| 69 74 2d 77 69 6e 64 6f | 77 2d 76 65 72 74 69 63 |it-windo|w-vertic|
|000029c0| 61 6c 6c 79 22 29 3b 0a | 09 6b 65 79 64 75 70 28 |ally");.|.keydup(|
|000029d0| 28 4b 45 59 29 4b 53 46 | 37 2c 09 22 64 65 6c 65 |(KEY)KSF|7,."dele|
|000029e0| 74 65 2d 6f 74 68 65 72 | 2d 77 69 6e 64 6f 77 73 |te-other|-windows|
|000029f0| 22 29 3b 0a 0a 09 6b 65 | 79 64 75 70 28 28 4b 45 |");...ke|ydup((KE|
|00002a00| 59 29 4b 46 38 2c 09 22 | 67 6c 6f 62 61 6c 2d 73 |Y)KF8,."|global-s|
|00002a10| 65 74 2d 6b 65 79 22 29 | 3b 0a 09 6b 65 79 64 75 |et-key")|;..keydu|
|00002a20| 70 28 28 4b 45 59 29 4b | 53 46 38 2c 09 22 67 6c |p((KEY)K|SF8,."gl|
|00002a30| 6f 62 61 6c 2d 75 6e 73 | 65 74 2d 6b 65 79 22 29 |obal-uns|et-key")|
|00002a40| 3b 0a 0a 09 6b 65 79 64 | 75 70 28 28 4b 45 59 29 |;...keyd|up((KEY)|
|00002a50| 4b 46 39 2c 09 22 73 74 | 61 72 74 2d 6b 62 64 2d |KF9,."st|art-kbd-|
|00002a60| 6d 61 63 72 6f 22 29 3b | 0a 09 6b 65 79 64 75 70 |macro");|..keydup|
|00002a70| 28 28 4b 45 59 29 4b 53 | 46 39 2c 09 22 65 6e 64 |((KEY)KS|F9,."end|
|00002a80| 2d 6b 62 64 2d 6d 61 63 | 72 6f 22 29 3b 0a 0a 09 |-kbd-mac|ro");...|
|00002a90| 6b 65 79 64 75 70 28 28 | 4b 45 59 29 4b 46 31 30 |keydup((|KEY)KF10|
|00002aa0| 2c 09 22 63 61 6c 6c 2d | 6c 61 73 74 2d 6b 62 64 |,."call-|last-kbd|
|00002ab0| 2d 6d 61 63 72 6f 22 29 | 3b 0a 09 6b 65 79 64 75 |-macro")|;..keydu|
|00002ac0| 70 28 28 4b 45 59 29 4b | 53 46 31 30 2c 09 22 73 |p((KEY)K|SF10,."s|
|00002ad0| 61 76 65 2d 62 75 66 66 | 65 72 73 2d 6b 69 6c 6c |ave-buff|ers-kill|
|00002ae0| 2d 65 6d 61 63 73 22 29 | 3b 0a 23 65 6e 64 69 66 |-emacs")|;.#endif|
|00002af0| 0a 0a 23 69 66 64 65 66 | 09 4d 4f 55 53 45 0a 09 |..#ifdef|.MOUSE..|
|00002b00| 2f 2a 20 4d 6f 75 73 65 | 20 63 6c 69 63 6b 73 20 |/* Mouse| clicks |
|00002b10| 69 6e 20 61 20 77 69 6e | 64 6f 77 20 64 6f 20 65 |in a win|dow do e|
|00002b20| 64 69 74 69 6e 67 20 66 | 75 6e 63 74 69 6f 6e 73 |diting f|unctions|
|00002b30| 20 6f 6e 20 74 68 65 09 | 2a 2f 0a 09 2f 2a 20 77 | on the.|*/../* w|
|00002b40| 69 6e 64 6f 77 2e 09 09 | 09 09 09 09 2a 2f 0a 0a |indow...|....*/..|
|00002b50| 09 6b 65 79 61 64 64 28 | 57 4d 4f 55 53 45 2c 09 |.keyadd(|WMOUSE,.|
|00002b60| 09 61 6d 69 67 61 6d 6f | 75 73 65 2c 09 22 61 6d |.amigamo|use,."am|
|00002b70| 69 67 61 2d 6d 6f 75 73 | 65 22 29 3b 0a 09 6b 65 |iga-mous|e");..ke|
|00002b80| 79 61 64 64 28 53 28 57 | 4d 4f 55 53 45 29 2c 09 |yadd(S(W|MOUSE),.|
|00002b90| 6d 72 65 70 6f 73 69 74 | 69 6f 6e 2c 09 22 6d 6f |mreposit|ion,."mo|
|00002ba0| 75 73 65 2d 72 65 63 65 | 6e 74 65 72 22 29 3b 0a |use-rece|nter");.|
|00002bb0| 09 6b 65 79 61 64 64 28 | 41 28 57 4d 4f 55 53 45 |.keyadd(|A(WMOUSE|
|00002bc0| 29 2c 09 6d 64 65 6c 66 | 77 6f 72 64 2c 09 22 6d |),.mdelf|word,."m|
|00002bd0| 6f 75 73 65 2d 6b 69 6c | 6c 2d 77 6f 72 64 22 29 |ouse-kil|l-word")|
|00002be0| 3b 0a 09 6b 65 79 61 64 | 64 28 41 53 28 57 4d 4f |;..keyad|d(AS(WMO|
|00002bf0| 55 53 45 29 2c 09 6d 6b | 69 6c 6c 6c 69 6e 65 2c |USE),.mk|illline,|
|00002c00| 09 22 6d 6f 75 73 65 2d | 6b 69 6c 6c 2d 6c 69 6e |."mouse-|kill-lin|
|00002c10| 65 22 29 3b 0a 09 6b 65 | 79 61 64 64 28 43 28 57 |e");..ke|yadd(C(W|
|00002c20| 4d 4f 55 53 45 29 2c 09 | 6d 66 6f 72 77 64 65 6c |MOUSE),.|mforwdel|
|00002c30| 2c 09 22 6d 6f 75 73 65 | 2d 64 65 6c 65 74 65 2d |,."mouse|-delete-|
|00002c40| 63 68 61 72 22 29 3b 0a | 09 6b 65 79 61 64 64 28 |char");.|.keyadd(|
|00002c50| 43 53 28 57 4d 4f 55 53 | 45 29 2c 09 6d 64 65 6c |CS(WMOUS|E),.mdel|
|00002c60| 77 68 69 74 65 2c 09 22 | 6d 6f 75 73 65 2d 6a 75 |white,."|mouse-ju|
|00002c70| 73 74 2d 6f 6e 65 2d 73 | 70 61 63 65 22 29 3b 0a |st-one-s|pace");.|
|00002c80| 09 6b 65 79 61 64 64 28 | 43 41 28 57 4d 4f 55 53 |.keyadd(|CA(WMOUS|
|00002c90| 45 29 2c 09 6d 6b 69 6c | 6c 72 65 67 69 6f 6e 2c |E),.mkil|lregion,|
|00002ca0| 09 22 6d 6f 75 73 65 2d | 6b 69 6c 6c 2d 72 65 67 |."mouse-|kill-reg|
|00002cb0| 69 6f 6e 22 29 3b 0a 09 | 6b 65 79 61 64 64 28 43 |ion");..|keyadd(C|
|00002cc0| 41 53 28 57 4d 4f 55 53 | 45 29 2c 09 6d 79 61 6e |AS(WMOUS|E),.myan|
|00002cd0| 6b 2c 09 09 22 6d 6f 75 | 73 65 2d 79 61 6e 6b 22 |k,.."mou|se-yank"|
|00002ce0| 29 3b 0a 0a 09 2f 2a 20 | 4d 6f 75 73 65 20 63 6c |);.../* |Mouse cl|
|00002cf0| 69 63 6b 73 20 69 6e 20 | 74 68 65 20 73 74 61 74 |icks in |the stat|
|00002d00| 75 73 20 6c 69 6e 65 20 | 73 65 6c 65 63 74 20 74 |us line |select t|
|00002d10| 68 61 74 20 77 69 6e 64 | 6f 77 20 61 6e 64 09 2a |hat wind|ow and.*|
|00002d20| 2f 0a 09 2f 2a 20 74 68 | 65 6e 20 70 65 72 66 6f |/../* th|en perfo|
|00002d30| 72 6d 20 61 20 63 6f 6d | 6d 61 6e 64 20 6f 6e 20 |rm a com|mand on |
|00002d40| 74 68 61 74 20 77 69 6e | 64 6f 77 20 6f 72 20 62 |that win|dow or b|
|00002d50| 75 66 66 65 72 2e 09 09 | 2a 2f 0a 09 2f 2a 20 55 |uffer...|*/../* U|
|00002d60| 73 65 20 6b 65 79 61 64 | 64 28 29 20 62 65 63 61 |se keyad|d() beca|
|00002d70| 75 73 65 20 74 68 65 79 | 20 68 61 76 65 6e 27 74 |use they| haven't|
|00002d80| 20 62 65 65 6e 20 62 6f | 75 6e 64 20 62 65 66 6f | been bo|und befo|
|00002d90| 72 65 09 09 2a 2f 0a 0a | 09 6b 65 79 61 64 64 28 |re..*/..|.keyadd(|
|00002da0| 53 4d 4f 55 53 45 2c 09 | 20 20 20 6d 66 6f 72 77 |SMOUSE,.| mforw|
|00002db0| 70 61 67 65 2c 09 22 6d | 6f 75 73 65 2d 73 63 72 |page,."m|ouse-scr|
|00002dc0| 6f 6c 6c 2d 75 70 22 29 | 3b 0a 09 6b 65 79 61 64 |oll-up")|;..keyad|
|00002dd0| 64 28 53 28 53 4d 4f 55 | 53 45 29 2c 20 20 6d 62 |d(S(SMOU|SE), mb|
|00002de0| 61 63 6b 70 61 67 65 2c | 09 22 6d 6f 75 73 65 2d |ackpage,|."mouse-|
|00002df0| 73 63 72 6f 6c 6c 2d 64 | 6f 77 6e 22 29 3b 0a 09 |scroll-d|own");..|
|00002e00| 6b 65 79 61 64 64 28 41 | 28 53 4d 4f 55 53 45 29 |keyadd(A|(SMOUSE)|
|00002e10| 2c 20 20 6d 73 70 6c 69 | 74 77 69 6e 64 2c 09 22 |, mspli|twind,."|
|00002e20| 6d 6f 75 73 65 2d 73 70 | 6c 69 74 2d 77 69 6e 64 |mouse-sp|lit-wind|
|00002e30| 6f 77 2d 76 65 72 74 69 | 63 61 6c 6c 79 22 29 3b |ow-verti|cally");|
|00002e40| 0a 09 6b 65 79 61 64 64 | 28 41 53 28 53 4d 4f 55 |..keyadd|(AS(SMOU|
|00002e50| 53 45 29 2c 20 6d 64 65 | 6c 77 69 6e 64 2c 09 22 |SE), mde|lwind,."|
|00002e60| 6d 6f 75 73 65 2d 64 65 | 6c 65 74 65 2d 77 69 6e |mouse-de|lete-win|
|00002e70| 64 6f 77 22 29 3b 0a 09 | 6b 65 79 61 64 64 28 43 |dow");..|keyadd(C|
|00002e80| 28 53 4d 4f 55 53 45 29 | 2c 20 20 6d 67 6f 74 6f |(SMOUSE)|, mgoto|
|00002e90| 62 6f 62 2c 09 22 6d 6f | 75 73 65 2d 62 65 67 69 |bob,."mo|use-begi|
|00002ea0| 6e 6e 69 6e 67 2d 6f 66 | 2d 62 75 66 66 65 72 22 |nning-of|-buffer"|
|00002eb0| 29 3b 0a 09 6b 65 79 61 | 64 64 28 43 53 28 53 4d |);..keya|dd(CS(SM|
|00002ec0| 4f 55 53 45 29 2c 20 6d | 67 6f 74 6f 65 6f 62 2c |OUSE), m|gotoeob,|
|00002ed0| 09 22 6d 6f 75 73 65 2d | 65 6e 64 2d 6f 66 2d 62 |."mouse-|end-of-b|
|00002ee0| 75 66 66 65 72 22 29 3b | 0a 09 6b 65 79 61 64 64 |uffer");|..keyadd|
|00002ef0| 28 43 41 28 53 4d 4f 55 | 53 45 29 2c 20 6d 65 6e |(CA(SMOU|SE), men|
|00002f00| 6c 61 72 67 65 77 69 6e | 64 2c 22 6d 6f 75 73 65 |largewin|d,"mouse|
|00002f10| 2d 65 6e 6c 61 72 67 65 | 2d 77 69 6e 64 6f 77 22 |-enlarge|-window"|
|00002f20| 29 3b 0a 09 6b 65 79 61 | 64 64 28 43 41 53 28 53 |);..keya|dd(CAS(S|
|00002f30| 4d 4f 55 53 45 29 2c 6d | 73 68 72 69 6e 6b 77 69 |MOUSE),m|shrinkwi|
|00002f40| 6e 64 2c 09 22 6d 6f 75 | 73 65 2d 73 68 72 69 6e |nd,."mou|se-shrin|
|00002f50| 6b 2d 77 69 6e 64 6f 77 | 22 29 3b 0a 0a 09 2f 2a |k-window|");.../*|
|00002f60| 20 6d 6f 75 73 65 20 63 | 6c 69 63 6b 73 20 69 6e | mouse c|licks in|
|00002f70| 20 65 63 68 6f 20 6c 69 | 6e 65 20 64 6f 20 67 6c | echo li|ne do gl|
|00002f80| 6f 62 61 6c 20 74 68 69 | 6e 67 73 09 09 2a 2f 0a |obal thi|ngs..*/.|
|00002f90| 0a 23 69 66 64 65 66 09 | 4d 45 59 4e 0a 09 6b 65 |.#ifdef.|MEYN..ke|
|00002fa0| 79 64 75 70 28 45 4d 4f | 55 53 45 2c 09 09 22 73 |ydup(EMO|USE,.."s|
|00002fb0| 61 76 65 2d 62 75 66 66 | 65 72 22 29 3b 0a 23 65 |ave-buff|er");.#e|
|00002fc0| 6c 73 65 0a 09 6b 65 79 | 64 75 70 28 45 4d 4f 55 |lse..key|dup(EMOU|
|00002fd0| 53 45 2c 09 09 22 73 77 | 69 74 63 68 2d 74 6f 2d |SE,.."sw|itch-to-|
|00002fe0| 62 75 66 66 65 72 22 29 | 3b 0a 23 65 6e 64 69 66 |buffer")|;.#endif|
|00002ff0| 0a 09 6b 65 79 64 75 70 | 28 53 28 45 4d 4f 55 53 |..keydup|(S(EMOUS|
|00003000| 45 29 2c 09 22 6b 69 6c | 6c 2d 62 75 66 66 65 72 |E),."kil|l-buffer|
|00003010| 22 29 3b 0a 09 6b 65 79 | 64 75 70 28 41 28 45 4d |");..key|dup(A(EM|
|00003020| 4f 55 53 45 29 2c 09 22 | 64 65 73 63 72 69 62 65 |OUSE),."|describe|
|00003030| 2d 6b 65 79 2d 62 72 69 | 65 66 6c 79 22 29 3b 0a |-key-bri|efly");.|
|00003040| 09 6b 65 79 64 75 70 28 | 41 53 28 45 4d 4f 55 53 |.keydup(|AS(EMOUS|
|00003050| 45 29 2c 09 22 64 65 73 | 63 72 69 62 65 2d 62 69 |E),."des|cribe-bi|
|00003060| 6e 64 69 6e 67 73 22 29 | 3b 0a 09 6b 65 79 64 75 |ndings")|;..keydu|
|00003070| 70 28 43 28 45 4d 4f 55 | 53 45 29 2c 09 22 73 75 |p(C(EMOU|SE),."su|
|00003080| 73 70 65 6e 64 2d 65 6d | 61 63 73 22 29 3b 0a 09 |spend-em|acs");..|
|00003090| 6b 65 79 64 75 70 28 43 | 53 28 45 4d 4f 55 53 45 |keydup(C|S(EMOUSE|
|000030a0| 29 2c 09 22 73 61 76 65 | 2d 62 75 66 66 65 72 73 |),."save|-buffers|
|000030b0| 2d 6b 69 6c 6c 2d 65 6d | 61 63 73 22 29 3b 0a 09 |-kill-em|acs");..|
|000030c0| 6b 65 79 64 75 70 28 43 | 41 28 45 4d 4f 55 53 45 |keydup(C|A(EMOUSE|
|000030d0| 29 2c 09 22 6c 69 73 74 | 2d 62 75 66 66 65 72 73 |),."list|-buffers|
|000030e0| 22 29 3b 0a 09 6b 65 79 | 64 75 70 28 43 41 53 28 |");..key|dup(CAS(|
|000030f0| 45 4d 4f 55 53 45 29 2c | 09 22 74 6f 67 67 6c 65 |EMOUSE),|."toggle|
|00003100| 2d 77 69 6e 64 6f 77 2d | 68 61 63 6b 22 29 3b 0a |-window-|hack");.|
|00003110| 23 65 6e 64 69 66 0a 7d | 0a 53 48 41 52 5f 45 4f |#endif.}|.SHAR_EO|
|00003120| 46 0a 66 69 20 23 20 65 | 6e 64 20 6f 66 20 6f 76 |F.fi # e|nd of ov|
|00003130| 65 72 77 72 69 74 69 6e | 67 20 63 68 65 63 6b 0a |erwritin|g check.|
|00003140| 69 66 20 74 65 73 74 20 | 2d 66 20 27 74 74 79 2f |if test |-f 'tty/|
|00003150| 61 6d 69 67 61 2f 74 74 | 79 6d 6f 75 73 65 2e 63 |amiga/tt|ymouse.c|
|00003160| 27 0a 74 68 65 6e 0a 09 | 65 63 68 6f 20 73 68 61 |'.then..|echo sha|
|00003170| 72 3a 20 77 69 6c 6c 20 | 6e 6f 74 20 6f 76 65 72 |r: will |not over|
|00003180| 2d 77 72 69 74 65 20 65 | 78 69 73 74 69 6e 67 20 |-write e|xisting |
|00003190| 66 69 6c 65 20 22 27 74 | 74 79 2f 61 6d 69 67 61 |file "'t|ty/amiga|
|000031a0| 2f 74 74 79 6d 6f 75 73 | 65 2e 63 27 22 0a 65 6c |/ttymous|e.c'".el|
|000031b0| 73 65 0a 63 61 74 20 3c | 3c 20 5c 53 48 41 52 5f |se.cat <|< \SHAR_|
|000031c0| 45 4f 46 20 3e 20 27 74 | 74 79 2f 61 6d 69 67 61 |EOF > 't|ty/amiga|
|000031d0| 2f 74 74 79 6d 6f 75 73 | 65 2e 63 27 0a 2f 2a 0a |/ttymous|e.c'./*.|
|000031e0| 20 2a 20 4e 61 6d 65 3a | 09 4d 69 63 72 6f 45 6d | * Name:|.MicroEm|
|000031f0| 61 63 73 0a 20 2a 09 09 | 43 6f 6d 6d 6f 64 6f 72 |acs. *..|Commodor|
|00003200| 65 20 41 6d 69 67 61 20 | 6d 6f 75 73 65 20 68 61 |e Amiga |mouse ha|
|00003210| 6e 64 6c 69 6e 67 20 28 | 6e 6f 20 6c 6f 6e 67 65 |ndling (|no longe|
|00003220| 72 20 73 69 6d 70 6c 65 | 21 29 0a 20 2a 20 56 65 |r simple|!). * Ve|
|00003230| 72 73 69 6f 6e 3a 09 47 | 6e 75 20 76 33 30 0a 20 |rsion:.G|nu v30. |
|00003240| 2a 20 4c 61 73 74 20 65 | 64 69 74 3a 09 30 32 2d |* Last e|dit:.02-|
|00003250| 41 75 67 2d 38 36 20 20 | 2e 2e 2e 21 69 68 6e 70 |Aug-86 |...!ihnp|
|00003260| 34 21 73 65 69 73 6d 6f | 21 75 74 2d 73 61 6c 6c |4!seismo|!ut-sall|
|00003270| 79 21 75 74 2d 6e 67 70 | 21 6d 69 63 0a 20 2a 2f |y!ut-ngp|!mic. */|
|00003280| 0a 0a 23 69 6e 63 6c 75 | 64 65 20 3c 65 78 65 63 |..#inclu|de <exec|
|00003290| 2f 74 79 70 65 73 2e 68 | 3e 0a 23 69 6e 63 6c 75 |/types.h|>.#inclu|
|000032a0| 64 65 20 3c 69 6e 74 75 | 69 74 69 6f 6e 2f 69 6e |de <intu|ition/in|
|000032b0| 74 75 69 74 69 6f 6e 2e | 68 3e 0a 23 75 6e 64 65 |tuition.|h>.#unde|
|000032c0| 66 09 54 52 55 45 0a 23 | 75 6e 64 65 66 09 46 41 |f.TRUE.#|undef.FA|
|000032d0| 4c 53 45 0a 23 69 6e 63 | 6c 75 64 65 20 22 64 65 |LSE.#inc|lude "de|
|000032e0| 66 2e 68 22 0a 0a 65 78 | 74 65 72 6e 09 69 6e 74 |f.h"..ex|tern.int|
|000032f0| 09 74 74 6d 6f 75 73 65 | 28 29 3b 09 09 2f 2a 20 |.ttmouse|();../* |
|00003300| 44 65 66 69 6e 65 64 20 | 62 79 20 22 74 74 79 69 |Defined |by "ttyi|
|00003310| 6f 2e 63 22 09 09 2a 2f | 0a 65 78 74 65 72 6e 09 |o.c"..*/|.extern.|
|00003320| 69 6e 74 09 66 6f 72 77 | 6c 69 6e 65 28 29 3b 09 |int.forw|line();.|
|00003330| 09 2f 2a 20 44 65 66 69 | 6e 65 64 20 62 79 20 22 |./* Defi|ned by "|
|00003340| 6c 69 6e 65 2e 63 22 09 | 09 2a 2f 0a 65 78 74 65 |line.c".|.*/.exte|
|00003350| 72 6e 09 69 6e 74 09 66 | 6f 72 77 63 68 61 72 28 |rn.int.f|orwchar(|
|00003360| 29 3b 09 09 2f 2a 20 44 | 65 66 69 6e 65 64 20 62 |);../* D|efined b|
|00003370| 79 20 22 62 61 73 69 63 | 2e 63 22 09 09 2a 2f 0a |y "basic|.c"..*/.|
|00003380| 65 78 74 65 72 6e 09 69 | 6e 74 09 73 65 74 6d 61 |extern.i|nt.setma|
|00003390| 72 6b 28 29 3b 09 09 2f | 2a 20 44 65 66 69 6e 65 |rk();../|* Define|
|000033a0| 64 20 62 79 20 22 72 61 | 6e 64 6f 6d 2e 63 22 09 |d by "ra|ndom.c".|
|000033b0| 2a 2f 0a 0a 2f 2a 20 73 | 74 75 66 66 20 66 6f 72 |*/../* s|tuff for|
|000033c0| 20 67 6f 2d 74 6f 2d 77 | 69 6e 64 6f 77 2d 61 6e | go-to-w|indow-an|
|000033d0| 64 2d 64 6f 2d 69 74 20 | 66 75 6e 63 74 69 6f 6e |d-do-it |function|
|000033e0| 73 20 2a 2f 0a 65 78 74 | 65 72 6e 09 69 6e 74 09 |s */.ext|ern.int.|
|000033f0| 72 65 70 6f 73 69 74 69 | 6f 6e 28 29 3b 0a 65 78 |repositi|on();.ex|
|00003400| 74 65 72 6e 09 69 6e 74 | 09 64 65 6c 66 77 6f 72 |tern.int|.delfwor|
|00003410| 64 28 29 3b 0a 65 78 74 | 65 72 6e 09 69 6e 74 09 |d();.ext|ern.int.|
|00003420| 6b 69 6c 6c 6c 69 6e 65 | 28 29 3b 0a 65 78 74 65 |killline|();.exte|
|00003430| 72 6e 09 69 6e 74 09 66 | 6f 72 77 64 65 6c 28 29 |rn.int.f|orwdel()|
|00003440| 3b 0a 65 78 74 65 72 6e | 09 69 6e 74 09 64 65 6c |;.extern|.int.del|
|00003450| 77 68 69 74 65 28 29 3b | 0a 65 78 74 65 72 6e 09 |white();|.extern.|
|00003460| 69 6e 74 09 6b 69 6c 6c | 72 65 67 69 6f 6e 28 29 |int.kill|region()|
|00003470| 3b 0a 65 78 74 65 72 6e | 09 69 6e 74 09 79 61 6e |;.extern|.int.yan|
|00003480| 6b 28 29 3b 0a 65 78 74 | 65 72 6e 09 69 6e 74 09 |k();.ext|ern.int.|
|00003490| 66 6f 72 77 70 61 67 65 | 28 29 3b 0a 65 78 74 65 |forwpage|();.exte|
|000034a0| 72 6e 09 69 6e 74 09 62 | 61 63 6b 70 61 67 65 28 |rn.int.b|ackpage(|
|000034b0| 29 3b 0a 65 78 74 65 72 | 6e 09 69 6e 74 09 73 70 |);.exter|n.int.sp|
|000034c0| 6c 69 74 77 69 6e 64 28 | 29 3b 0a 65 78 74 65 72 |litwind(|);.exter|
|000034d0| 6e 09 69 6e 74 09 64 65 | 6c 77 69 6e 64 28 29 3b |n.int.de|lwind();|
|000034e0| 0a 65 78 74 65 72 6e 09 | 69 6e 74 09 67 6f 74 6f |.extern.|int.goto|
|000034f0| 62 6f 62 28 29 3b 0a 65 | 78 74 65 72 6e 09 69 6e |bob();.e|xtern.in|
|00003500| 74 09 67 6f 74 6f 65 6f | 62 28 29 3b 0a 65 78 74 |t.gotoeo|b();.ext|
|00003510| 65 72 6e 09 69 6e 74 09 | 65 6e 6c 61 72 67 65 77 |ern.int.|enlargew|
|00003520| 69 6e 64 28 29 3b 0a 65 | 78 74 65 72 6e 09 69 6e |ind();.e|xtern.in|
|00003530| 74 09 73 68 72 69 6e 6b | 77 69 6e 64 28 29 3b 0a |t.shrink|wind();.|
|00003540| 0a 2f 2a 0a 20 2a 20 48 | 61 6e 64 6c 65 20 74 68 |./*. * H|andle th|
|00003550| 65 20 6d 6f 75 73 65 20 | 63 6c 69 63 6b 20 74 68 |e mouse |click th|
|00003560| 61 74 27 73 20 62 65 65 | 6e 20 70 61 73 73 65 64 |at's bee|n passed|
|00003570| 0a 20 2a 20 62 79 20 74 | 74 67 65 74 63 28 29 20 |. * by t|tgetc() |
|00003580| 61 6e 64 20 70 6f 73 69 | 74 69 6f 6e 20 64 6f 74 |and posi|tion dot|
|00003590| 20 77 68 65 72 65 20 74 | 68 65 0a 20 2a 20 75 73 | where t|he. * us|
|000035a0| 65 72 20 70 6f 69 6e 74 | 65 64 20 61 74 2e 20 20 |er point|ed at. |
|000035b0| 49 66 20 74 68 69 73 20 | 69 73 20 74 68 65 20 73 |If this |is the s|
|000035c0| 61 6d 65 20 70 6f 73 69 | 74 69 6f 6e 0a 20 2a 20 |ame posi|tion. * |
|000035d0| 77 68 65 72 65 20 74 68 | 65 20 75 73 65 72 20 70 |where th|e user p|
|000035e0| 6f 69 6e 74 65 64 20 74 | 68 65 20 6c 61 73 74 20 |ointed t|he last |
|000035f0| 74 69 6d 65 2c 20 73 65 | 74 20 74 68 65 20 6d 61 |time, se|t the ma|
|00003600| 72 6b 2c 0a 20 2a 20 77 | 68 65 74 68 65 72 20 6f |rk,. * w|hether o|
|00003610| 72 20 6e 6f 74 20 74 68 | 69 73 20 69 73 20 61 20 |r not th|is is a |
|00003620| 74 72 75 65 20 64 6f 75 | 62 6c 65 2d 63 6c 69 63 |true dou|ble-clic|
|00003630| 6b 2e 0a 20 2a 20 54 68 | 69 73 20 69 73 6e 27 74 |k.. * Th|is isn't|
|00003640| 20 61 20 74 72 75 65 20 | 64 6f 75 62 6c 65 2d 63 | a true |double-c|
|00003650| 6c 69 63 6b 2c 20 62 75 | 74 20 69 74 20 64 6f 65 |lick, bu|t it doe|
|00003660| 73 0a 20 2a 20 6d 6f 73 | 74 20 6f 66 20 77 68 61 |s. * mos|t of wha|
|00003670| 74 20 77 65 20 77 61 6e | 74 2e 0a 20 2a 2f 0a 0a |t we wan|t.. */..|
|00003680| 73 74 61 74 69 63 20 55 | 53 48 4f 52 54 09 6f 6c |static U|SHORT.ol|
|00003690| 64 72 6f 77 20 3d 20 48 | 55 47 45 2c 20 6f 6c 64 |drow = H|UGE, old|
|000036a0| 63 6f 6c 20 3d 20 48 55 | 47 45 3b 09 2f 2a 20 6c |col = HU|GE;./* l|
|000036b0| 61 73 74 20 6d 6f 75 73 | 65 20 63 6c 69 63 6b 09 |ast mous|e click.|
|000036c0| 2a 2f 0a 73 74 61 74 69 | 63 20 55 53 48 4f 52 54 |*/.stati|c USHORT|
|000036d0| 09 6e 65 77 72 6f 77 2c | 20 6e 65 77 63 6f 6c 3b |.newrow,| newcol;|
|000036e0| 09 09 09 2f 2a 20 6e 65 | 78 74 20 6d 6f 75 73 65 |.../* ne|xt mouse|
|000036f0| 20 63 6c 69 63 6b 09 2a | 2f 0a 0a 61 6d 69 67 61 | click.*|/..amiga|
|00003700| 6d 6f 75 73 65 28 66 2c | 20 6e 2c 20 6b 29 0a 7b |mouse(f,| n, k).{|
|00003710| 0a 09 69 66 20 28 21 64 | 6f 74 74 6f 6d 6f 75 73 |..if (!d|ottomous|
|00003720| 65 28 29 29 09 09 09 2f | 2a 20 73 65 74 73 20 6e |e()).../|* sets n|
|00003730| 65 77 72 6f 77 2c 20 6e | 65 77 63 6f 6c 09 2a 2f |ewrow, n|ewcol.*/|
|00003740| 0a 09 09 72 65 74 75 72 | 6e 20 28 46 41 4c 53 45 |...retur|n (FALSE|
|00003750| 29 3b 0a 09 69 66 20 28 | 28 6e 65 77 72 6f 77 20 |);..if (|(newrow |
|00003760| 3d 3d 20 6f 6c 64 72 6f | 77 29 20 26 26 20 28 6e |== oldro|w) && (n|
|00003770| 65 77 63 6f 6c 20 3d 3d | 20 6f 6c 64 63 6f 6c 29 |ewcol ==| oldcol)|
|00003780| 29 0a 09 09 73 65 74 6d | 61 72 6b 28 46 41 4c 53 |)...setm|ark(FALS|
|00003790| 45 2c 20 30 2c 20 4b 52 | 41 4e 44 4f 4d 29 3b 09 |E, 0, KR|ANDOM);.|
|000037a0| 2f 2a 20 64 6f 75 62 6c | 65 2d 63 6c 69 63 6b 09 |/* doubl|e-click.|
|000037b0| 09 2a 2f 0a 09 6f 6c 64 | 72 6f 77 20 3d 20 6e 65 |.*/..old|row = ne|
|000037c0| 77 72 6f 77 3b 09 09 20 | 20 20 20 09 2f 2a 20 73 |wrow;.. | ./* s|
|000037d0| 61 76 65 20 73 74 61 74 | 65 09 09 2a 2f 0a 09 6f |ave stat|e..*/..o|
|000037e0| 6c 64 63 6f 6c 20 3d 20 | 6e 65 77 63 6f 6c 3b 0a |ldcol = |newcol;.|
|000037f0| 09 72 65 74 75 72 6e 20 | 28 54 52 55 45 29 3b 0a |.return |(TRUE);.|
|00003800| 7d 0a 0a 2f 2a 0a 20 2a | 20 52 65 63 65 6e 74 65 |}../*. *| Recente|
|00003810| 72 20 6f 6e 20 73 65 6c | 65 63 74 65 64 20 6c 69 |r on sel|ected li|
|00003820| 6e 65 0a 20 2a 2f 0a 6d | 72 65 70 6f 73 69 74 69 |ne. */.m|repositi|
|00003830| 6f 6e 28 66 2c 20 6e 2c | 20 6b 29 0a 7b 0a 09 69 |on(f, n,| k).{..i|
|00003840| 66 20 28 21 64 6f 74 74 | 6f 6d 6f 75 73 65 28 29 |f (!dott|omouse()|
|00003850| 29 0a 09 09 72 65 74 75 | 72 6e 20 28 46 41 4c 53 |)...retu|rn (FALS|
|00003860| 45 29 3b 0a 09 72 65 74 | 75 72 6e 20 28 72 65 70 |E);..ret|urn (rep|
|00003870| 6f 73 69 74 69 6f 6e 28 | 66 2c 20 6e 2c 20 6b 29 |osition(|f, n, k)|
|00003880| 29 3b 0a 7d 0a 0a 2f 2a | 0a 20 2a 20 44 65 6c 65 |);.}../*|. * Dele|
|00003890| 74 65 20 77 6f 72 64 20 | 61 66 74 65 72 20 73 65 |te word |after se|
|000038a0| 6c 65 63 74 65 64 20 63 | 68 61 72 0a 20 2a 2f 0a |lected c|har. */.|
|000038b0| 6d 64 65 6c 66 77 6f 72 | 64 28 66 2c 20 6e 2c 20 |mdelfwor|d(f, n, |
|000038c0| 6b 29 0a 7b 0a 09 69 66 | 20 28 21 64 6f 74 74 6f |k).{..if| (!dotto|
|000038d0| 6d 6f 75 73 65 28 29 29 | 0a 09 09 72 65 74 75 72 |mouse())|...retur|
|000038e0| 6e 20 28 46 41 4c 53 45 | 29 3b 0a 09 72 65 74 75 |n (FALSE|);..retu|
|000038f0| 72 6e 20 28 64 65 6c 66 | 77 6f 72 64 28 66 2c 20 |rn (delf|word(f, |
|00003900| 6e 2c 20 6b 29 29 3b 0a | 7d 0a 0a 2f 2a 0a 20 2a |n, k));.|}../*. *|
|00003910| 20 4d 6f 76 65 20 74 6f | 20 73 65 6c 65 63 74 69 | Move to| selecti|
|00003920| 6f 6e 2c 20 6b 69 6c 6c | 20 6c 69 6e 65 0a 20 2a |on, kill| line. *|
|00003930| 2f 0a 6d 6b 69 6c 6c 6c | 69 6e 65 28 66 2c 20 6e |/.mkilll|ine(f, n|
|00003940| 2c 20 6b 29 0a 7b 0a 09 | 69 66 20 28 21 64 6f 74 |, k).{..|if (!dot|
|00003950| 74 6f 6d 6f 75 73 65 28 | 29 29 0a 09 09 72 65 74 |tomouse(|))...ret|
|00003960| 75 72 6e 20 28 46 41 4c | 53 45 29 3b 0a 09 72 65 |urn (FAL|SE);..re|
|00003970| 74 75 72 6e 20 28 6b 69 | 6c 6c 6c 69 6e 65 28 66 |turn (ki|llline(f|
|00003980| 2c 20 6e 2c 20 6b 29 29 | 3b 0a 7d 0a 0a 2f 2a 0a |, n, k))|;.}../*.|
|00003990| 20 2a 20 4d 6f 76 65 20 | 74 6f 20 73 65 6c 65 63 | * Move |to selec|
|000039a0| 74 69 6f 6e 2c 20 6b 69 | 6c 6c 20 6c 69 6e 65 0a |tion, ki|ll line.|
|000039b0| 20 2a 2f 0a 6d 66 6f 72 | 77 64 65 6c 28 66 2c 20 | */.mfor|wdel(f, |
|000039c0| 6e 2c 20 6b 29 0a 7b 0a | 09 69 66 20 28 21 64 6f |n, k).{.|.if (!do|
|000039d0| 74 74 6f 6d 6f 75 73 65 | 28 29 29 0a 09 09 72 65 |ttomouse|())...re|
|000039e0| 74 75 72 6e 20 28 46 41 | 4c 53 45 29 3b 0a 09 72 |turn (FA|LSE);..r|
|000039f0| 65 74 75 72 6e 20 28 66 | 6f 72 77 64 65 6c 28 66 |eturn (f|orwdel(f|
|00003a00| 2c 20 6e 2c 20 6b 29 29 | 3b 0a 7d 0a 0a 2f 2a 0a |, n, k))|;.}../*.|
|00003a10| 20 2a 20 4d 6f 76 65 20 | 74 6f 20 73 65 6c 65 63 | * Move |to selec|
|00003a20| 74 69 6f 6e 2c 20 6b 69 | 6c 6c 20 6c 69 6e 65 0a |tion, ki|ll line.|
|00003a30| 20 2a 2f 0a 6d 64 65 6c | 77 68 69 74 65 28 66 2c | */.mdel|white(f,|
|00003a40| 20 6e 2c 20 6b 29 0a 7b | 0a 09 69 66 20 28 21 64 | n, k).{|..if (!d|
|00003a50| 6f 74 74 6f 6d 6f 75 73 | 65 28 29 29 0a 09 09 72 |ottomous|e())...r|
|00003a60| 65 74 75 72 6e 20 28 46 | 41 4c 53 45 29 3b 0a 09 |eturn (F|ALSE);..|
|00003a70| 72 65 74 75 72 6e 20 28 | 64 65 6c 77 68 69 74 65 |return (|delwhite|
|00003a80| 28 66 2c 20 6e 2c 20 6b | 29 29 3b 0a 7d 0a 0a 2f |(f, n, k|));.}../|
|00003a90| 2a 0a 20 2a 20 4d 6f 76 | 65 20 74 6f 20 73 65 6c |*. * Mov|e to sel|
|00003aa0| 65 63 74 69 6f 6e 2c 20 | 6b 69 6c 6c 20 72 65 67 |ection, |kill reg|
|00003ab0| 69 6f 6e 2e 0a 20 2a 20 | 54 68 69 73 20 6d 61 6b |ion.. * |This mak|
|00003ac0| 65 73 20 69 74 20 65 61 | 73 79 20 74 6f 20 6d 61 |es it ea|sy to ma|
|00003ad0| 72 6b 20 61 0a 20 2a 20 | 72 65 67 69 6f 6e 20 77 |rk a. * |region w|
|00003ae0| 69 74 68 20 61 20 64 6f | 75 62 6c 65 2d 63 6c 69 |ith a do|uble-cli|
|00003af0| 63 6b 2c 20 74 68 65 6e | 0a 20 2a 20 68 6f 6c 64 |ck, then|. * hold|
|00003b00| 20 64 6f 77 6e 20 73 6f | 6d 65 20 73 68 69 66 74 | down so|me shift|
|00003b10| 20 6b 65 79 73 20 74 6f | 0a 20 2a 20 64 65 6c 65 | keys to|. * dele|
|00003b20| 74 65 20 74 68 65 20 72 | 65 67 69 6f 6e 2e 0a 20 |te the r|egion.. |
|00003b30| 2a 2f 0a 6d 6b 69 6c 6c | 72 65 67 69 6f 6e 28 66 |*/.mkill|region(f|
|00003b40| 2c 20 6e 2c 20 6b 29 0a | 7b 0a 09 69 66 20 28 21 |, n, k).|{..if (!|
|00003b50| 64 6f 74 74 6f 6d 6f 75 | 73 65 28 29 29 0a 09 09 |dottomou|se())...|
|00003b60| 72 65 74 75 72 6e 20 28 | 46 41 4c 53 45 29 3b 0a |return (|FALSE);.|
|00003b70| 09 72 65 74 75 72 6e 20 | 28 6b 69 6c 6c 72 65 67 |.return |(killreg|
|00003b80| 69 6f 6e 28 66 2c 20 6e | 2c 20 6b 29 29 3b 0a 7d |ion(f, n|, k));.}|
|00003b90| 0a 0a 2f 2a 0a 20 2a 20 | 4d 6f 76 65 20 74 6f 20 |../*. * |Move to |
|00003ba0| 73 65 6c 65 63 74 69 6f | 6e 2c 20 79 61 6e 6b 20 |selectio|n, yank |
|00003bb0| 6b 69 6c 6c 20 62 75 66 | 66 65 72 0a 20 2a 2f 0a |kill buf|fer. */.|
|00003bc0| 6d 79 61 6e 6b 28 66 2c | 20 6e 2c 20 6b 29 0a 7b |myank(f,| n, k).{|
|00003bd0| 0a 09 69 66 20 28 21 64 | 6f 74 74 6f 6d 6f 75 73 |..if (!d|ottomous|
|00003be0| 65 28 29 29 0a 09 09 72 | 65 74 75 72 6e 20 28 46 |e())...r|eturn (F|
|00003bf0| 41 4c 53 45 29 3b 0a 09 | 72 65 74 75 72 6e 20 28 |ALSE);..|return (|
|00003c00| 79 61 6e 6b 28 66 2c 20 | 6e 2c 20 6b 29 29 3b 0a |yank(f, |n, k));.|
|00003c10| 7d 0a 0a 2f 2a 0a 20 2a | 20 53 65 6c 65 63 74 20 |}../*. *| Select |
|00003c20| 77 69 6e 64 6f 77 20 70 | 6f 69 6e 74 65 64 20 74 |window p|ointed t|
|00003c30| 6f 20 62 79 20 6d 6f 75 | 73 65 2c 20 74 68 65 6e |o by mou|se, then|
|00003c40| 20 73 63 72 6f 6c 6c 20 | 64 6f 77 6e 0a 20 2a 2f | scroll |down. */|
|00003c50| 0a 0a 6d 66 6f 72 77 70 | 61 67 65 28 66 2c 20 6e |..mforwp|age(f, n|
|00003c60| 2c 20 6b 29 0a 7b 0a 09 | 69 66 20 28 21 64 6f 74 |, k).{..|if (!dot|
|00003c70| 74 6f 6d 6f 75 73 65 28 | 29 29 0a 09 09 72 65 74 |tomouse(|))...ret|
|00003c80| 75 72 6e 20 28 46 41 4c | 53 45 29 3b 0a 09 72 65 |urn (FAL|SE);..re|
|00003c90| 74 75 72 6e 20 28 66 6f | 72 77 70 61 67 65 28 66 |turn (fo|rwpage(f|
|00003ca0| 2c 20 6e 2c 20 6b 29 29 | 3b 0a 7d 0a 0a 2f 2a 0a |, n, k))|;.}../*.|
|00003cb0| 20 2a 20 53 65 6c 65 63 | 74 20 62 75 66 66 65 72 | * Selec|t buffer|
|00003cc0| 2c 20 73 63 72 6f 6c 6c | 20 70 61 67 65 20 64 6f |, scroll| page do|
|00003cd0| 77 6e 0a 20 2a 2f 0a 6d | 62 61 63 6b 70 61 67 65 |wn. */.m|backpage|
|00003ce0| 28 66 2c 20 6e 2c 20 6b | 29 0a 7b 0a 09 69 66 20 |(f, n, k|).{..if |
|00003cf0| 28 21 64 6f 74 74 6f 6d | 6f 75 73 65 28 29 29 0a |(!dottom|ouse()).|
|00003d00| 09 09 72 65 74 75 72 6e | 20 28 46 41 4c 53 45 29 |..return| (FALSE)|
|00003d10| 3b 0a 09 72 65 74 75 72 | 6e 20 28 62 61 63 6b 70 |;..retur|n (backp|
|00003d20| 61 67 65 28 66 2c 20 6e | 2c 20 6b 29 29 3b 0a 7d |age(f, n|, k));.}|
|00003d30| 0a 0a 2f 2a 0a 20 2a 20 | 53 65 6c 65 63 74 20 74 |../*. * |Select t|
|00003d40| 68 65 20 77 69 6e 64 6f | 77 2c 20 73 70 6c 69 74 |he windo|w, split|
|00003d50| 20 69 74 2e 0a 20 2a 2f | 0a 6d 73 70 6c 69 74 77 | it.. */|.msplitw|
|00003d60| 69 6e 64 28 66 2c 20 6e | 2c 20 6b 29 0a 7b 0a 09 |ind(f, n|, k).{..|
|00003d70| 69 66 20 28 21 64 6f 74 | 74 6f 6d 6f 75 73 65 28 |if (!dot|tomouse(|
|00003d80| 29 29 0a 09 09 72 65 74 | 75 72 6e 20 28 46 41 4c |))...ret|urn (FAL|
|00003d90| 53 45 29 3b 0a 09 72 65 | 74 75 72 6e 20 28 73 70 |SE);..re|turn (sp|
|00003da0| 6c 69 74 77 69 6e 64 28 | 66 2c 20 6e 2c 20 6b 29 |litwind(|f, n, k)|
|00003db0| 29 3b 0a 7d 0a 0a 2f 2a | 0a 20 2a 20 53 65 6c 65 |);.}../*|. * Sele|
|00003dc0| 63 74 20 74 68 65 20 62 | 75 66 66 65 72 2c 20 64 |ct the b|uffer, d|
|00003dd0| 65 6c 65 74 65 20 69 74 | 2e 0a 20 2a 2f 0a 6d 64 |elete it|.. */.md|
|00003de0| 65 6c 77 69 6e 64 28 66 | 2c 20 6e 2c 20 6b 29 0a |elwind(f|, n, k).|
|00003df0| 7b 0a 09 69 66 20 28 21 | 64 6f 74 74 6f 6d 6f 75 |{..if (!|dottomou|
|00003e00| 73 65 28 29 29 0a 09 09 | 72 65 74 75 72 6e 20 28 |se())...|return (|
|00003e10| 46 41 4c 53 45 29 3b 0a | 09 72 65 74 75 72 6e 20 |FALSE);.|.return |
|00003e20| 28 64 65 6c 77 69 6e 64 | 28 66 2c 20 6e 2c 20 6b |(delwind|(f, n, k|
|00003e30| 29 29 3b 0a 7d 0a 0a 2f | 2a 0a 20 2a 20 53 65 6c |));.}../|*. * Sel|
|00003e40| 65 63 74 20 77 69 6e 64 | 6f 77 2c 20 67 6f 74 6f |ect wind|ow, goto|
|00003e50| 20 62 65 67 69 6e 6e 69 | 6e 67 20 6f 66 20 62 75 | beginni|ng of bu|
|00003e60| 66 66 65 72 0a 20 2a 2f | 0a 6d 67 6f 74 6f 62 6f |ffer. */|.mgotobo|
|00003e70| 62 28 66 2c 20 6e 2c 20 | 6b 29 0a 7b 0a 09 69 66 |b(f, n, |k).{..if|
|00003e80| 20 28 21 64 6f 74 74 6f | 6d 6f 75 73 65 28 29 29 | (!dotto|mouse())|
|00003e90| 0a 09 09 72 65 74 75 72 | 6e 20 28 46 41 4c 53 45 |...retur|n (FALSE|
|00003ea0| 29 3b 0a 09 72 65 74 75 | 72 6e 20 28 67 6f 74 6f |);..retu|rn (goto|
|00003eb0| 62 6f 62 28 66 2c 20 6e | 2c 20 6b 29 29 3b 0a 7d |bob(f, n|, k));.}|
|00003ec0| 0a 0a 2f 2a 0a 20 2a 20 | 53 65 6c 65 63 74 20 77 |../*. * |Select w|
|00003ed0| 69 6e 64 6f 77 2c 20 67 | 6f 20 74 6f 20 65 6e 64 |indow, g|o to end|
|00003ee0| 20 6f 66 20 62 75 66 66 | 65 72 0a 20 2a 2f 0a 6d | of buff|er. */.m|
|00003ef0| 67 6f 74 6f 65 6f 62 28 | 66 2c 20 6e 2c 20 6b 29 |gotoeob(|f, n, k)|
|00003f00| 0a 7b 0a 09 69 66 20 28 | 21 64 6f 74 74 6f 6d 6f |.{..if (|!dottomo|
|00003f10| 75 73 65 28 29 29 0a 09 | 09 72 65 74 75 72 6e 20 |use())..|.return |
|00003f20| 28 46 41 4c 53 45 29 3b | 0a 09 72 65 74 75 72 6e |(FALSE);|..return|
|00003f30| 20 28 67 6f 74 6f 65 6f | 62 28 66 2c 20 6e 2c 20 | (gotoeo|b(f, n, |
|00003f40| 6b 29 29 3b 0a 7d 0a 0a | 2f 2a 0a 20 2a 20 53 65 |k));.}..|/*. * Se|
|00003f50| 6c 65 63 74 20 77 69 6e | 64 6f 77 2c 20 65 6e 6c |lect win|dow, enl|
|00003f60| 61 72 67 65 20 69 74 2e | 0a 20 2a 2f 0a 6d 65 6e |arge it.|. */.men|
|00003f70| 6c 61 72 67 65 77 69 6e | 64 28 66 2c 20 6e 2c 20 |largewin|d(f, n, |
|00003f80| 6b 29 0a 7b 0a 09 69 66 | 20 28 21 64 6f 74 74 6f |k).{..if| (!dotto|
|00003f90| 6d 6f 75 73 65 28 29 29 | 0a 09 09 72 65 74 75 72 |mouse())|...retur|
|00003fa0| 6e 20 28 46 41 4c 53 45 | 29 3b 0a 09 72 65 74 75 |n (FALSE|);..retu|
|00003fb0| 72 6e 20 28 65 6e 6c 61 | 72 67 65 77 69 6e 64 28 |rn (enla|rgewind(|
|00003fc0| 66 2c 20 6e 2c 20 6b 29 | 29 3b 0a 7d 0a 09 0a 2f |f, n, k)|);.}.../|
|00003fd0| 2a 0a 20 2a 20 53 65 6c | 65 63 74 20 77 69 6e 64 |*. * Sel|ect wind|
|00003fe0| 6f 77 2c 20 73 68 72 69 | 6e 6b 20 69 74 2e 0a 20 |ow, shri|nk it.. |
|00003ff0| 2a 2f 0a 6d 73 68 72 69 | 6e 6b 77 69 6e 64 28 66 |*/.mshri|nkwind(f|
|00004000| 2c 20 6e 2c 20 6b 29 0a | 7b 0a 09 69 66 20 28 21 |, n, k).|{..if (!|
|00004010| 64 6f 74 74 6f 6d 6f 75 | 73 65 28 29 29 0a 09 09 |dottomou|se())...|
|00004020| 72 65 74 75 72 6e 20 28 | 46 41 4c 53 45 29 3b 0a |return (|FALSE);.|
|00004030| 09 72 65 74 75 72 6e 20 | 28 73 68 72 69 6e 6b 77 |.return |(shrinkw|
|00004040| 69 6e 64 28 66 2c 20 6e | 2c 20 6b 29 29 3b 0a 7d |ind(f, n|, k));.}|
|00004050| 0a 0a 2f 2a 0a 20 2a 20 | 55 74 69 6c 69 74 79 20 |../*. * |Utility |
|00004060| 72 6f 75 74 69 6e 65 20 | 74 6f 20 6d 6f 76 65 20 |routine |to move |
|00004070| 64 6f 74 20 74 6f 20 77 | 68 65 72 65 0a 20 2a 20 |dot to w|here. * |
|00004080| 74 68 65 20 75 73 65 72 | 20 63 6c 69 63 6b 65 64 |the user| clicked|
|00004090| 2e 20 20 49 66 20 69 6e | 20 6d 6f 64 65 20 6c 69 |. If in| mode li|
|000040a0| 6e 65 2c 0a 20 2a 20 63 | 68 6f 6f 73 65 73 20 74 |ne,. * c|hooses t|
|000040b0| 68 61 74 20 62 75 66 66 | 65 72 20 61 73 20 74 68 |hat buff|er as th|
|000040c0| 65 20 6f 6e 65 0a 20 2a | 20 74 6f 20 77 6f 72 6b |e one. *| to work|
|000040d0| 20 6f 6e 2e 0a 20 2a 2f | 0a 0a 73 74 61 74 69 63 | on.. */|..static|
|000040e0| 20 64 6f 74 74 6f 6d 6f | 75 73 65 28 29 0a 7b 0a | dottomo|use().{.|
|000040f0| 09 72 65 67 69 73 74 65 | 72 20 57 49 4e 44 4f 57 |.registe|r WINDOW|
|00004100| 20 2a 77 70 3b 0a 09 72 | 65 67 69 73 74 65 72 20 | *wp;..r|egister |
|00004110| 69 6e 74 09 64 6f 74 3b | 0a 09 72 65 67 69 73 74 |int.dot;|..regist|
|00004120| 65 72 20 69 6e 74 09 63 | 3b 0a 09 72 65 67 69 73 |er int.c|;..regis|
|00004130| 74 65 72 20 69 6e 74 09 | 63 6f 6c 3b 0a 09 69 6e |ter int.|col;..in|
|00004140| 74 09 09 71 75 61 6c 69 | 66 69 65 72 3b 0a 0a 09 |t..quali|fier;...|
|00004150| 2f 2a 20 66 69 67 75 72 | 65 20 6f 75 74 20 6e 65 |/* figur|e out ne|
|00004160| 77 20 73 63 72 65 65 6e | 20 70 6f 73 69 74 69 6f |w screen| positio|
|00004170| 6e 20 6f 66 20 64 6f 74 | 2c 20 74 68 72 6f 77 20 |n of dot|, throw |
|00004180| 61 77 61 79 20 6d 6f 75 | 73 65 20 65 76 74 20 2a |away mou|se evt *|
|00004190| 2f 0a 09 69 66 20 28 21 | 74 74 6d 6f 75 73 65 28 |/..if (!|ttmouse(|
|000041a0| 54 52 55 45 2c 20 26 6e | 65 77 72 6f 77 2c 20 26 |TRUE, &n|ewrow, &|
|000041b0| 6e 65 77 63 6f 6c 2c 20 | 26 71 75 61 6c 69 66 69 |newcol, |&qualifi|
|000041c0| 65 72 29 29 0a 09 09 72 | 65 74 75 72 6e 20 28 46 |er))...r|eturn (F|
|000041d0| 41 4c 53 45 29 3b 09 09 | 09 2f 2a 20 6f 75 74 20 |ALSE);..|./* out |
|000041e0| 6f 66 20 73 79 6e 63 68 | 21 09 2a 2f 0a 0a 09 2f |of synch|!.*/.../|
|000041f0| 2a 20 66 69 6e 64 20 6f | 75 74 20 77 68 69 63 68 |* find o|ut which|
|00004200| 20 77 69 6e 64 6f 77 20 | 77 61 73 20 63 6c 69 63 | window |was clic|
|00004210| 6b 65 64 20 69 6e 09 09 | 09 09 2a 2f 0a 09 66 6f |ked in..|..*/..fo|
|00004220| 72 20 28 77 70 20 3d 20 | 77 68 65 61 64 70 3b 20 |r (wp = |wheadp; |
|00004230| 77 70 20 21 3d 20 4e 55 | 4c 4c 3b 20 77 70 20 3d |wp != NU|LL; wp =|
|00004240| 20 77 70 2d 3e 77 5f 77 | 6e 64 70 29 0a 09 09 69 | wp->w_w|ndp)...i|
|00004250| 66 20 28 28 6e 65 77 72 | 6f 77 20 3e 3d 20 77 70 |f ((newr|ow >= wp|
|00004260| 2d 3e 77 5f 74 6f 70 72 | 6f 77 29 20 26 26 20 0a |->w_topr|ow) && .|
|00004270| 09 09 09 28 6e 65 77 72 | 6f 77 20 3c 3d 20 28 77 |...(newr|ow <= (w|
|00004280| 70 2d 3e 77 5f 74 6f 70 | 72 6f 77 20 2b 20 77 70 |p->w_top|row + wp|
|00004290| 2d 3e 77 5f 6e 74 72 6f | 77 73 29 29 29 0a 09 09 |->w_ntro|ws)))...|
|000042a0| 09 62 72 65 61 6b 3b 0a | 0a 09 69 66 20 28 77 70 |.break;.|..if (wp|
|000042b0| 20 3d 3d 20 4e 55 4c 4c | 29 09 09 09 09 2f 2a 20 | == NULL|)..../* |
|000042c0| 65 63 68 6f 20 6c 69 6e | 65 09 09 2a 2f 0a 09 09 |echo lin|e..*/...|
|000042d0| 72 65 74 75 72 6e 20 28 | 41 42 4f 52 54 29 3b 0a |return (|ABORT);.|
|000042e0| 09 65 6c 73 65 20 69 66 | 20 28 6e 65 77 72 6f 77 |.else if| (newrow|
|000042f0| 20 3d 3d 20 77 70 2d 3e | 77 5f 74 6f 70 72 6f 77 | == wp->|w_toprow|
|00004300| 20 2b 20 77 70 2d 3e 77 | 5f 6e 74 72 6f 77 73 29 | + wp->w|_ntrows)|
|00004310| 20 7b 2f 2a 20 6d 6f 64 | 65 20 6c 69 6e 65 20 2a | {/* mod|e line *|
|00004320| 2f 0a 09 09 63 75 72 77 | 70 20 3d 20 77 70 3b 09 |/...curw|p = wp;.|
|00004330| 09 09 2f 2a 20 6a 75 73 | 74 20 63 68 61 6e 67 65 |../* jus|t change|
|00004340| 20 62 75 66 66 65 72 09 | 20 2a 2f 0a 09 09 63 75 | buffer.| */...cu|
|00004350| 72 62 70 20 3d 20 77 70 | 2d 3e 77 5f 62 75 66 70 |rbp = wp|->w_bufp|
|00004360| 3b 0a 09 7d 20 65 6c 73 | 65 20 7b 0a 09 09 2f 2a |;..} els|e {.../*|
|00004370| 20 6d 6f 76 65 20 74 6f | 20 73 65 6c 65 63 74 65 | move to| selecte|
|00004380| 64 20 77 69 6e 64 6f 77 | 2c 20 6d 6f 76 65 20 64 |d window|, move d|
|00004390| 6f 74 20 74 6f 20 74 6f | 70 20 6c 65 66 74 09 2a |ot to to|p left.*|
|000043a0| 2f 0a 09 09 63 75 72 77 | 70 20 3d 20 77 70 3b 0a |/...curw|p = wp;.|
|000043b0| 09 09 63 75 72 62 70 20 | 3d 20 77 70 2d 3e 77 5f |..curbp |= wp->w_|
|000043c0| 62 75 66 70 3b 0a 09 09 | 63 75 72 77 70 2d 3e 77 |bufp;...|curwp->w|
|000043d0| 5f 64 6f 74 70 20 3d 20 | 77 70 2d 3e 77 5f 6c 69 |_dotp = |wp->w_li|
|000043e0| 6e 65 70 3b 0a 09 09 63 | 75 72 77 70 2d 3e 77 5f |nep;...c|urwp->w_|
|000043f0| 64 6f 74 6f 20 3d 20 30 | 3b 0a 0a 09 09 2f 2a 20 |doto = 0|;..../* |
|00004400| 67 6f 20 66 6f 72 77 61 | 72 64 20 74 68 65 20 63 |go forwa|rd the c|
|00004410| 6f 72 72 65 63 74 20 23 | 20 6f 66 20 6c 69 6e 65 |orrect #| of line|
|00004420| 73 20 09 09 2a 2f 0a 09 | 09 66 6f 72 77 6c 69 6e |s ..*/..|.forwlin|
|00004430| 65 28 46 41 4c 53 45 2c | 20 6e 65 77 72 6f 77 20 |e(FALSE,| newrow |
|00004440| 2d 20 63 75 72 77 70 2d | 3e 77 5f 74 6f 70 72 6f |- curwp-|>w_topro|
|00004450| 77 2c 20 4b 52 41 4e 44 | 4f 4d 29 3b 0a 09 0a 09 |w, KRAND|OM);....|
|00004460| 09 2f 2a 20 67 6f 20 66 | 6f 72 77 61 72 64 20 74 |./* go f|orward t|
|00004470| 68 65 20 63 6f 72 72 65 | 63 74 20 23 20 6f 66 20 |he corre|ct # of |
|00004480| 63 68 61 72 61 63 74 65 | 72 73 09 2a 2f 0a 09 09 |characte|rs.*/...|
|00004490| 2f 2a 20 6e 65 65 64 20 | 74 6f 20 63 6f 75 6e 74 |/* need |to count|
|000044a0| 20 74 68 65 6d 20 6f 75 | 74 20 62 65 63 61 75 73 | them ou|t becaus|
|000044b0| 65 20 6f 66 20 74 61 62 | 73 09 2a 2f 0a 09 09 63 |e of tab|s.*/...c|
|000044c0| 6f 6c 20 3d 20 64 6f 74 | 20 3d 20 30 3b 0a 09 09 |ol = dot| = 0;...|
|000044d0| 77 68 69 6c 65 20 28 28 | 63 6f 6c 20 3c 20 6e 65 |while ((|col < ne|
|000044e0| 77 63 6f 6c 29 20 26 26 | 20 28 64 6f 74 20 3c 20 |wcol) &&| (dot < |
|000044f0| 6c 6c 65 6e 67 74 68 28 | 63 75 72 77 70 2d 3e 77 |llength(|curwp->w|
|00004500| 5f 64 6f 74 70 29 29 29 | 20 7b 0a 09 09 09 63 20 |_dotp)))| {....c |
|00004510| 3d 20 6c 67 65 74 63 28 | 63 75 72 77 70 2d 3e 77 |= lgetc(|curwp->w|
|00004520| 5f 64 6f 74 70 2c 20 64 | 6f 74 2b 2b 29 3b 0a 09 |_dotp, d|ot++);..|
|00004530| 09 09 69 66 20 28 63 20 | 3d 3d 20 27 5c 74 27 29 |..if (c |== '\t')|
|00004540| 0a 09 09 09 09 63 6f 6c | 20 7c 3d 20 30 78 30 37 |.....col| |= 0x07|
|00004550| 3b 0a 09 09 09 65 6c 73 | 65 20 69 66 20 28 49 53 |;....els|e if (IS|
|00004560| 43 54 52 4c 28 63 29 20 | 21 3d 20 46 41 4c 53 45 |CTRL(c) |!= FALSE|
|00004570| 29 0a 09 09 09 09 2b 2b | 63 6f 6c 3b 0a 09 09 09 |).....++|col;....|
|00004580| 2b 2b 63 6f 6c 3b 0a 09 | 09 7d 0a 23 69 66 64 65 |++col;..|.}.#ifde|
|00004590| 66 09 09 4d 45 59 4e 0a | 09 09 69 66 20 28 63 6f |f..MEYN.|..if (co|
|000045a0| 6c 20 3e 20 6e 65 77 63 | 6f 6c 29 20 64 6f 74 2d |l > newc|ol) dot-|
|000045b0| 2d 3b 09 2f 2a 20 62 61 | 63 6b 20 75 70 20 74 6f |-;./* ba|ck up to|
|000045c0| 20 74 61 62 2f 63 74 72 | 6c 20 63 68 61 72 20 2a | tab/ctr|l char *|
|000045d0| 2f 0a 23 65 6e 64 69 66 | 0a 09 09 66 6f 72 77 63 |/.#endif|...forwc|
|000045e0| 68 61 72 28 46 41 4c 53 | 45 2c 20 64 6f 74 2c 20 |har(FALS|E, dot, |
|000045f0| 4b 52 41 4e 44 4f 4d 29 | 3b 0a 09 7d 0a 09 72 65 |KRANDOM)|;..}..re|
|00004600| 74 75 72 6e 20 28 54 52 | 55 45 29 3b 0a 7d 0a 53 |turn (TR|UE);.}.S|
|00004610| 48 41 52 5f 45 4f 46 0a | 66 69 20 23 20 65 6e 64 |HAR_EOF.|fi # end|
|00004620| 20 6f 66 20 6f 76 65 72 | 77 72 69 74 69 6e 67 20 | of over|writing |
|00004630| 63 68 65 63 6b 0a 69 66 | 20 74 65 73 74 20 2d 66 |check.if| test -f|
|00004640| 20 27 73 79 73 2f 61 6d | 69 67 61 2f 4d 61 6b 65 | 'sys/am|iga/Make|
|00004650| 66 69 6c 65 2e 4c 41 54 | 54 49 43 45 27 0a 74 68 |file.LAT|TICE'.th|
|00004660| 65 6e 0a 09 65 63 68 6f | 20 73 68 61 72 3a 20 77 |en..echo| shar: w|
|00004670| 69 6c 6c 20 6e 6f 74 20 | 6f 76 65 72 2d 77 72 69 |ill not |over-wri|
|00004680| 74 65 20 65 78 69 73 74 | 69 6e 67 20 66 69 6c 65 |te exist|ing file|
|00004690| 20 22 27 73 79 73 2f 61 | 6d 69 67 61 2f 4d 61 6b | "'sys/a|miga/Mak|
|000046a0| 65 66 69 6c 65 2e 4c 41 | 54 54 49 43 45 27 22 0a |efile.LA|TTICE'".|
|000046b0| 65 6c 73 65 0a 63 61 74 | 20 3c 3c 20 5c 53 48 41 |else.cat| << \SHA|
|000046c0| 52 5f 45 4f 46 20 3e 20 | 27 73 79 73 2f 61 6d 69 |R_EOF > |'sys/ami|
|000046d0| 67 61 2f 4d 61 6b 65 66 | 69 6c 65 2e 4c 41 54 54 |ga/Makef|ile.LATT|
|000046e0| 49 43 45 27 0a 23 0a 23 | 20 4d 61 6b 65 66 69 6c |ICE'.#.#| Makefil|
|000046f0| 65 20 66 6f 72 20 41 6d | 69 67 61 20 4d 69 63 72 |e for Am|iga Micr|
|00004700| 6f 47 4e 55 6d 61 63 73 | 2c 20 75 73 69 6e 67 20 |oGNUmacs|, using |
|00004710| 6c 61 74 74 69 63 65 20 | 61 6e 64 20 50 44 20 6d |lattice |and PD m|
|00004720| 61 6b 65 2e 0a 23 0a 23 | 09 54 68 69 73 20 4d 61 |ake..#.#|.This Ma|
|00004730| 6b 65 66 69 6c 65 20 73 | 68 6f 75 6c 64 20 62 65 |kefile s|hould be|
|00004740| 20 65 78 65 63 75 74 65 | 64 20 69 6e 20 74 68 65 | execute|d in the|
|00004750| 20 6d 61 69 6e 20 45 6d | 61 63 73 20 64 69 72 65 | main Em|acs dire|
|00004760| 63 74 6f 72 79 2e 0a 23 | 0a 23 20 43 6f 6e 64 69 |ctory..#|.# Condi|
|00004770| 74 69 6f 6e 61 6c 20 63 | 6f 6d 70 69 6c 61 74 69 |tional c|ompilati|
|00004780| 6f 6e 20 70 6f 73 73 69 | 62 69 6c 69 74 69 65 73 |on possi|bilities|
|00004790| 3a 0a 23 0a 23 09 56 31 | 31 09 09 2d 2d 20 6d 75 |:.#.#.V1|1..-- mu|
|000047a0| 73 74 20 62 65 20 64 65 | 66 69 6e 65 64 20 66 6f |st be de|fined fo|
|000047b0| 72 20 74 68 65 20 65 64 | 69 74 6f 72 20 74 6f 20 |r the ed|itor to |
|000047c0| 65 69 74 68 65 72 20 72 | 75 6e 20 6f 6e 0a 23 09 |either r|un on.#.|
|000047d0| 09 09 20 20 20 6f 72 20 | 63 6f 6d 70 69 6c 65 20 |.. or |compile |
|000047e0| 6f 6e 20 61 20 76 65 72 | 73 69 6f 6e 20 31 2e 31 |on a ver|sion 1.1|
|000047f0| 20 61 6d 69 67 61 64 6f | 73 20 73 79 73 74 65 6d | amigado|s system|
|00004800| 0a 23 0a 23 09 53 54 41 | 52 54 55 50 09 09 2d 2d |.#.#.STA|RTUP..--|
|00004810| 20 69 66 20 64 65 66 69 | 6e 65 64 2c 20 63 6f 64 | if defi|ned, cod|
|00004820| 65 20 66 6f 72 20 75 73 | 69 6e 67 20 61 20 73 74 |e for us|ing a st|
|00004830| 61 72 74 75 70 20 66 69 | 6c 65 0a 23 09 09 09 20 |artup fi|le.#... |
|00004840| 20 20 69 73 20 69 6e 63 | 6c 75 64 65 64 2e 20 20 | is inc|luded. |
|00004850| 54 68 69 73 20 69 73 20 | 68 61 6e 64 79 20 66 6f |This is |handy fo|
|00004860| 72 20 66 6f 6c 6b 73 20 | 77 68 6f 0a 23 09 09 09 |r folks |who.#...|
|00004870| 20 20 20 77 6f 6e 27 74 | 20 62 65 20 61 62 6c 65 | won't| be able|
|00004880| 20 74 6f 20 68 61 63 6b | 20 74 68 65 20 65 64 69 | to hack| the edi|
|00004890| 74 6f 72 20 74 6f 20 74 | 68 65 69 72 0a 23 09 09 |tor to t|heir.#..|
|000048a0| 09 20 20 20 74 61 73 74 | 65 2e 0a 23 0a 23 09 4d |. tast|e..#.#.M|
|000048b0| 45 4e 55 09 09 2d 2d 20 | 69 66 20 64 65 66 69 6e |ENU..-- |if defin|
|000048c0| 65 64 2c 20 49 6e 74 75 | 69 74 69 6f 6e 20 6d 65 |ed, Intu|ition me|
|000048d0| 6e 75 20 73 65 6c 65 63 | 74 69 6f 6e 20 69 73 0a |nu selec|tion is.|
|000048e0| 23 09 09 09 20 20 20 65 | 6e 61 62 6c 65 64 2e 20 |#... e|nabled. |
|000048f0| 20 54 68 69 73 20 75 73 | 65 73 20 61 20 67 6f 6f | This us|es a goo|
|00004900| 64 20 62 69 74 20 6f 66 | 20 73 70 61 63 65 2c 0a |d bit of| space,.|
|00004910| 23 09 09 09 20 20 20 62 | 6f 74 68 20 6f 6e 20 64 |#... b|oth on d|
|00004920| 69 73 6b 20 61 6e 64 20 | 69 6e 20 6d 65 6d 6f 72 |isk and |in memor|
|00004930| 79 2e 20 20 49 66 20 79 | 6f 75 20 23 64 65 66 69 |y. If y|ou #defi|
|00004940| 6e 65 0a 23 09 09 09 20 | 20 20 74 68 69 73 2c 20 |ne.#... | this, |
|00004950| 74 68 65 20 58 4f 42 4a | 20 6d 61 63 72 6f 20 6d |the XOBJ| macro m|
|00004960| 75 73 74 20 63 6f 6e 74 | 61 69 6e 20 24 28 4d 45 |ust cont|ain $(ME|
|00004970| 4e 55 4f 42 4a 29 2e 0a | 23 0a 23 09 42 52 4f 57 |NUOBJ)..|#.#.BROW|
|00004980| 53 45 52 09 09 2d 2d 20 | 42 52 4f 57 53 45 52 20 |SER..-- |BROWSER |
|00004990| 75 73 65 73 20 74 68 65 | 20 41 6d 69 67 61 20 6d |uses the| Amiga m|
|000049a0| 65 6e 75 20 74 6f 0a 23 | 09 09 09 20 20 20 70 72 |enu to.#|... pr|
|000049b0| 65 73 65 6e 74 20 61 20 | 4d 45 4e 55 20 6f 66 20 |esent a |MENU of |
|000049c0| 66 69 6c 65 73 2e 20 53 | 65 6c 65 63 74 69 6e 67 |files. S|electing|
|000049d0| 20 61 20 64 69 72 65 63 | 74 6f 72 79 0a 23 09 09 | a direc|tory.#..|
|000049e0| 09 20 20 20 65 6e 74 72 | 79 20 28 65 6e 64 73 20 |. entr|y (ends |
|000049f0| 77 69 74 68 20 61 20 2f | 29 20 6d 61 6b 65 73 20 |with a /|) makes |
|00004a00| 74 68 65 20 63 6f 6e 74 | 65 6e 74 73 20 69 66 20 |the cont|ents if |
|00004a10| 74 68 61 74 0a 23 09 09 | 09 20 20 20 64 69 72 65 |that.#..|. dire|
|00004a20| 63 74 6f 72 79 20 74 68 | 65 20 6e 65 78 74 20 6d |ctory th|e next m|
|00004a30| 65 6e 75 20 28 64 65 6c | 65 74 69 6e 67 20 61 6e |enu (del|eting an|
|00004a40| 79 20 6d 65 6e 75 73 20 | 74 68 61 74 0a 23 09 09 |y menus |that.#..|
|00004a50| 09 20 20 20 75 73 65 64 | 20 74 6f 20 66 6f 6c 6c |. used| to foll|
|00004a60| 6f 77 20 69 74 29 3b 20 | 73 65 6c 65 63 74 69 6e |ow it); |selectin|
|00004a70| 67 20 61 20 70 6c 61 69 | 6e 20 66 69 6c 65 20 64 |g a plai|n file d|
|00004a80| 6f 65 73 20 61 0a 23 09 | 09 09 20 20 20 22 66 69 |oes a.#.|.. "fi|
|00004a90| 6e 64 2d 66 69 6c 65 22 | 20 6f 6e 20 74 68 61 74 |nd-file"| on that|
|00004aa0| 20 66 69 6c 65 20 6e 61 | 6d 65 2e 20 52 65 61 6c | file na|me. Real|
|00004ab0| 6c 79 20 68 61 73 20 74 | 6f 20 62 65 0a 23 09 09 |ly has t|o be.#..|
|00004ac0| 09 20 20 20 73 65 65 6e | 20 74 6f 20 62 65 20 75 |. seen| to be u|
|00004ad0| 6e 64 65 72 73 74 6f 6f | 64 2e 20 58 4f 42 4a 20 |nderstoo|d. XOBJ |
|00004ae0| 6d 75 73 74 20 63 6f 6e | 74 61 69 6e 0a 23 09 09 |must con|tain.#..|
|00004af0| 09 20 20 20 24 28 4d 45 | 4e 55 4f 42 4a 29 20 66 |. $(ME|NUOBJ) f|
|00004b00| 6f 72 20 74 68 69 73 20 | 74 6f 20 77 6f 72 6b 2e |or this |to work.|
|00004b10| 0a 23 0a 23 09 4d 4f 55 | 53 45 09 09 2d 2d 20 69 |.#.#.MOU|SE..-- i|
|00004b20| 66 20 64 65 66 69 6e 65 | 64 2c 20 74 68 65 20 41 |f define|d, the A|
|00004b30| 6d 69 67 61 20 6d 6f 75 | 73 65 20 69 73 20 61 63 |miga mou|se is ac|
|00004b40| 74 69 76 65 2e 0a 23 09 | 09 09 20 20 20 49 66 20 |tive..#.|.. If |
|00004b50| 79 6f 75 20 23 64 65 66 | 69 6e 65 20 74 68 69 73 |you #def|ine this|
|00004b60| 2c 20 58 4f 42 4a 20 6d | 75 73 74 20 63 6f 6e 74 |, XOBJ m|ust cont|
|00004b70| 61 69 6e 20 24 28 4d 4f | 55 53 45 4f 42 4a 29 0a |ain $(MO|USEOBJ).|
|00004b80| 23 0a 23 09 58 4b 45 59 | 53 09 09 2d 2d 20 69 66 |#.#.XKEY|S..-- if|
|00004b90| 20 64 65 66 69 6e 65 64 | 2c 20 74 68 65 20 65 64 | defined|, the ed|
|00004ba0| 69 74 6f 72 20 75 6e 64 | 65 72 73 74 61 6e 64 73 |itor und|erstands|
|00004bb0| 20 74 68 65 20 41 6d 69 | 67 61 0a 23 09 09 09 20 | the Ami|ga.#... |
|00004bc0| 20 20 66 75 6e 63 74 69 | 6f 6e 20 6b 65 79 73 2e | functi|on keys.|
|00004bd0| 0a 23 0a 23 09 44 4f 5f | 4d 45 54 41 4b 45 59 09 |.#.#.DO_|METAKEY.|
|00004be0| 2d 2d 20 69 66 20 64 65 | 66 69 6e 65 64 2c 20 63 |-- if de|fined, c|
|00004bf0| 68 61 72 61 63 74 65 72 | 73 20 77 69 74 68 20 68 |haracter|s with h|
|00004c00| 69 67 68 20 62 69 74 20 | 73 65 74 20 28 69 2e 65 |igh bit |set (i.e|
|00004c10| 2e 0a 23 09 09 09 20 20 | 20 6d 6f 73 74 20 41 4c |..#... | most AL|
|00004c20| 54 2d 65 64 20 63 68 61 | 72 61 63 74 65 72 73 20 |T-ed cha|racters |
|00004c30| 69 6e 20 74 68 65 20 75 | 73 61 30 20 6b 65 79 6d |in the u|sa0 keym|
|00004c40| 61 70 29 0a 23 09 09 09 | 20 20 20 61 72 65 20 74 |ap).#...| are t|
|00004c50| 72 61 6e 73 6c 61 74 65 | 64 20 69 6e 74 6f 20 69 |ranslate|d into i|
|00004c60| 6e 74 65 72 6e 61 6c 20 | 4d 45 54 41 20 6b 65 79 |nternal |META key|
|00004c70| 73 0a 23 0a 23 09 43 48 | 41 4e 47 45 5f 43 4f 4c |s.#.#.CH|ANGE_COL|
|00004c80| 4f 52 09 2d 2d 20 69 66 | 20 64 65 66 69 6e 65 64 |OR.-- if| defined|
|00004c90| 2c 20 61 64 64 73 20 63 | 6f 6d 6d 61 6e 64 73 20 |, adds c|ommands |
|00004ca0| 74 6f 20 6d 61 6e 69 70 | 75 6c 61 74 65 0a 23 09 |to manip|ulate.#.|
|00004cb0| 09 09 20 20 20 74 68 65 | 20 72 65 6e 64 69 74 69 |.. the| renditi|
|00004cc0| 6f 6e 20 6f 66 20 74 68 | 65 20 6d 6f 64 65 20 6c |on of th|e mode l|
|00004cd0| 69 6e 65 20 61 6e 64 20 | 74 68 65 0a 23 09 09 09 |ine and |the.#...|
|00004ce0| 20 20 20 66 6f 72 65 67 | 72 6f 75 6e 64 20 61 6e | foreg|round an|
|00004cf0| 64 20 62 61 63 6b 67 72 | 6f 75 6e 64 20 63 6f 6c |d backgr|ound col|
|00004d00| 6f 72 20 6f 66 20 74 68 | 65 0a 23 09 09 09 20 20 |or of th|e.#... |
|00004d10| 20 74 65 78 74 20 77 69 | 6e 64 6f 77 20 61 6e 64 | text wi|ndow and|
|00004d20| 20 6d 6f 64 65 20 6c 69 | 6e 65 2e 20 20 54 68 65 | mode li|ne. The|
|00004d30| 20 6e 61 6d 65 73 20 6d | 61 74 63 68 0a 23 09 09 | names m|atch.#..|
|00004d40| 09 20 20 20 74 68 65 20 | 72 65 67 75 6c 61 72 20 |. the |regular |
|00004d50| 65 78 70 72 65 73 73 69 | 6f 6e 0a 23 09 09 09 20 |expressi|on.#... |
|00004d60| 20 20 73 65 74 2d 7b 74 | 65 78 74 2c 6d 6f 64 65 | set-{t|ext,mode|
|00004d70| 7d 2d 7b 66 6f 72 65 67 | 72 6f 75 6e 64 2c 62 61 |}-{foreg|round,ba|
|00004d80| 63 6b 67 72 6f 75 6e 64 | 7d 0a 23 0a 23 09 4d 4f |ckground|}.#.#.MO|
|00004d90| 44 45 5f 52 45 4e 44 49 | 54 49 4f 4e 09 2d 2d 20 |DE_RENDI|TION.-- |
|00004da0| 74 68 65 20 74 68 65 73 | 65 20 76 61 6c 75 65 73 |the thes|e values|
|00004db0| 20 69 6e 64 69 63 61 74 | 65 20 74 68 65 20 77 61 | indicat|e the wa|
|00004dc0| 79 20 74 6f 20 72 65 6e | 64 65 72 0a 23 09 54 45 |y to ren|der.#.TE|
|00004dd0| 58 54 5f 52 45 4e 44 49 | 54 49 4f 4e 09 20 20 20 |XT_RENDI|TION. |
|00004de0| 63 68 61 72 61 63 74 65 | 72 73 20 69 6e 20 74 68 |characte|rs in th|
|00004df0| 65 20 74 65 78 74 20 61 | 72 65 61 20 61 6e 64 20 |e text a|rea and |
|00004e00| 6d 6f 64 65 20 6c 69 6e | 65 2e 0a 23 09 09 09 20 |mode lin|e..#... |
|00004e10| 20 20 54 45 58 54 5f 52 | 45 4e 44 49 54 49 4f 4e | TEXT_R|ENDITION|
|00004e20| 20 69 73 20 6d 61 69 6e | 6c 79 20 74 68 65 72 65 | is main|ly there|
|00004e30| 20 66 6f 72 20 63 6f 6d | 70 6c 65 74 65 6e 65 73 | for com|pletenes|
|00004e40| 73 2e 0a 23 09 09 09 20 | 20 20 50 6f 73 73 69 62 |s..#... | Possib|
|00004e50| 6c 65 20 76 61 6c 75 65 | 73 20 61 72 65 3a 0a 23 |le value|s are:.#|
|00004e60| 09 09 09 09 30 20 2d 2d | 20 70 6c 61 69 6e 20 74 |....0 --| plain t|
|00004e70| 65 78 74 0a 23 09 09 09 | 09 31 20 2d 2d 20 62 6f |ext.#...|.1 -- bo|
|00004e80| 6c 64 66 61 63 65 0a 23 | 09 09 09 09 33 20 2d 2d |ldface.#|....3 --|
|00004e90| 20 69 74 61 6c 69 63 0a | 23 09 09 09 09 34 20 2d | italic.|#....4 -|
|00004ea0| 2d 20 75 6e 64 65 72 73 | 63 6f 72 65 0a 23 09 09 |- unders|core.#..|
|00004eb0| 09 09 37 20 2d 2d 20 72 | 65 76 65 72 73 65 2d 76 |..7 -- r|everse-v|
|00004ec0| 69 64 65 6f 20 28 64 65 | 66 61 75 6c 74 20 69 66 |ideo (de|fault if|
|00004ed0| 20 6e 6f 74 20 64 65 66 | 69 6e 65 64 29 0a 23 0a | not def|ined).#.|
|00004ee0| 23 09 54 45 58 54 5f 46 | 47 09 09 2d 2d 20 73 70 |#.TEXT_F|G..-- sp|
|00004ef0| 65 63 69 66 69 65 73 20 | 77 68 69 63 68 20 73 79 |ecifies |which sy|
|00004f00| 73 74 65 6d 20 63 6f 6c | 6f 72 20 28 30 2d 37 29 |stem col|or (0-7)|
|00004f10| 20 74 6f 20 75 73 65 0a | 23 09 54 45 58 54 5f 42 | to use.|#.TEXT_B|
|00004f20| 47 09 09 20 20 20 77 68 | 65 6e 20 64 72 61 77 69 |G.. wh|en drawi|
|00004f30| 6e 67 20 74 68 65 20 74 | 65 78 74 20 61 6e 64 20 |ng the t|ext and |
|00004f40| 6d 6f 64 65 20 6c 69 6e | 65 2e 20 20 49 66 20 74 |mode lin|e. If t|
|00004f50| 68 65 79 0a 23 09 4d 4f | 44 45 5f 46 47 09 09 20 |hey.#.MO|DE_FG.. |
|00004f60| 20 20 61 72 65 6e 27 74 | 20 62 65 74 77 65 65 6e | aren't| between|
|00004f70| 20 30 20 61 6e 64 20 37 | 2c 20 6f 72 20 69 66 20 | 0 and 7|, or if |
|00004f80| 61 20 63 6f 6d 62 69 6e | 61 74 69 6f 6e 0a 23 09 |a combin|ation.#.|
|00004f90| 4d 4f 44 45 5f 42 47 09 | 09 20 20 20 63 6f 6d 65 |MODE_BG.|. come|
|00004fa0| 73 20 6f 75 74 20 62 61 | 64 6c 79 2c 20 69 74 27 |s out ba|dly, it'|
|00004fb0| 73 20 2a 59 4f 55 52 2a | 20 66 61 75 6c 74 2e 20 |s *YOUR*| fault. |
|00004fc0| 20 49 66 0a 23 09 09 09 | 20 20 20 43 48 41 4e 47 | If.#...| CHANG|
|00004fd0| 45 5f 43 4f 4c 4f 52 20 | 69 73 20 64 65 66 69 6e |E_COLOR |is defin|
|00004fe0| 65 64 2c 20 79 6f 75 20 | 67 65 74 20 74 6f 20 63 |ed, you |get to c|
|00004ff0| 68 61 6e 67 65 20 74 68 | 65 73 65 0a 23 09 09 09 |hange th|ese.#...|
|00005000| 20 20 20 76 61 6c 75 65 | 73 20 6f 6e 20 74 68 65 | value|s on the|
|00005010| 20 66 6c 79 2e 20 20 4e | 61 74 75 72 61 6c 6c 79 | fly. N|aturally|
|00005020| 2c 20 6d 61 6b 69 6e 67 | 20 62 6f 74 68 0a 23 09 |, making| both.#.|
|00005030| 09 09 20 20 20 46 47 20 | 61 6e 64 20 42 47 20 74 |.. FG |and BG t|
|00005040| 68 65 20 73 61 6d 65 20 | 72 65 73 75 6c 74 73 20 |he same |results |
|00005050| 69 6e 20 61 6e 20 75 6e | 75 73 61 62 6c 65 20 64 |in an un|usable d|
|00005060| 69 73 70 6c 61 79 2e 2e | 2e 0a 23 0a 23 09 54 4f |isplay..|..#.#.TO|
|00005070| 47 47 4c 45 5f 5a 4f 4f | 4d 53 09 2d 2d 20 74 68 |GGLE_ZOO|MS.-- th|
|00005080| 65 20 66 75 6e 63 74 69 | 6f 6e 20 74 6f 67 67 6c |e functi|on toggl|
|00005090| 65 2d 6d 65 6e 75 2d 68 | 61 63 6b 20 73 77 69 74 |e-menu-h|ack swit|
|000050a0| 63 68 65 73 20 62 65 74 | 77 65 65 6e 0a 23 09 09 |ches bet|ween.#..|
|000050b0| 09 20 20 20 61 20 62 6f | 72 64 65 72 65 64 2c 20 |. a bo|rdered, |
|000050c0| 73 69 7a 65 61 62 6c 65 | 20 77 69 6e 64 6f 77 20 |sizeable| window |
|000050d0| 61 6e 64 20 61 20 62 6f | 72 64 65 72 6c 65 73 73 |and a bo|rderless|
|000050e0| 0a 23 09 09 09 20 20 20 | 77 69 6e 64 6f 77 2e 20 |.#... |window. |
|000050f0| 20 42 79 20 64 65 66 61 | 75 6c 74 2c 20 74 68 65 | By defa|ult, the|
|00005100| 20 62 6f 72 64 65 72 6c | 65 73 73 20 77 69 6e 64 | borderl|ess wind|
|00005110| 6f 77 0a 23 09 09 09 20 | 20 20 72 65 74 61 69 6e |ow.#... | retain|
|00005120| 73 20 74 68 65 20 73 69 | 7a 65 20 6f 66 20 74 68 |s the si|ze of th|
|00005130| 65 20 73 69 7a 65 61 62 | 6c 65 20 77 69 6e 64 6f |e sizeab|le windo|
|00005140| 77 2e 0a 23 09 09 09 20 | 20 20 49 66 20 54 4f 47 |w..#... | If TOG|
|00005150| 47 4c 45 5f 5a 4f 4f 4d | 53 20 69 73 20 23 64 65 |GLE_ZOOM|S is #de|
|00005160| 66 69 6e 65 64 2c 20 68 | 6f 77 65 76 65 72 2c 20 |fined, h|owever, |
|00005170| 74 68 65 0a 23 09 09 09 | 20 20 20 62 6f 72 64 65 |the.#...| borde|
|00005180| 72 6c 65 73 73 20 77 69 | 6e 64 6f 77 20 61 6c 77 |rless wi|ndow alw|
|00005190| 61 79 73 20 74 61 6b 65 | 73 20 75 70 20 74 68 65 |ays take|s up the|
|000051a0| 20 77 68 6f 6c 65 0a 23 | 09 09 09 20 20 20 73 63 | whole.#|... sc|
|000051b0| 72 65 65 6e 2e 0a 23 0a | 23 23 23 23 23 23 23 23 |reen..#.|########|
|000051c0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000051d0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000051e0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000051f0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00005200| 23 23 23 23 0a 43 43 20 | 3d 09 09 63 63 0a 23 44 |####.CC |=..cc.#D|
|00005210| 45 42 55 47 46 4c 41 47 | 20 3d 09 2d 67 0a 54 54 |EBUGFLAG| =.-g.TT|
|00005220| 59 44 49 52 20 3d 09 74 | 74 79 2f 61 6d 69 67 61 |YDIR =.t|ty/amiga|
|00005230| 0a 53 59 53 44 49 52 20 | 3d 09 73 79 73 2f 61 6d |.SYSDIR |=.sys/am|
|00005240| 69 67 61 0a 4d 45 4e 55 | 4f 42 4a 20 3d 09 74 74 |iga.MENU|OBJ =.tt|
|00005250| 79 6d 65 6e 75 2e 6f 20 | 6d 65 6e 75 73 74 61 63 |ymenu.o |menustac|
|00005260| 6b 2e 6f 0a 4d 4f 55 53 | 45 4f 42 4a 20 3d 09 74 |k.o.MOUS|EOBJ =.t|
|00005270| 74 79 6d 6f 75 73 65 2e | 6f 0a 0a 49 4e 43 53 20 |tymouse.|o..INCS |
|00005280| 3d 20 64 65 66 2e 68 20 | 24 28 54 54 59 44 49 52 |= def.h |$(TTYDIR|
|00005290| 29 2f 74 74 79 64 65 66 | 2e 68 20 24 28 53 59 53 |)/ttydef|.h $(SYS|
|000052a0| 44 49 52 29 2f 73 79 73 | 64 65 66 2e 68 0a 0a 23 |DIR)/sys|def.h..#|
|000052b0| 20 54 68 65 20 77 68 6f | 6c 65 20 65 6e 63 68 69 | The who|le enchi|
|000052c0| 6c 61 64 61 20 28 7e 36 | 30 4b 20 77 69 74 68 20 |lada (~6|0K with |
|000052d0| 4d 61 6e 78 20 73 6d 61 | 6c 6c 20 6d 6f 64 65 6c |Manx sma|ll model|
|000052e0| 29 0a 50 52 45 46 53 20 | 3d 20 2d 44 53 54 41 52 |).PREFS |= -DSTAR|
|000052f0| 54 55 50 20 2d 44 42 52 | 4f 57 53 45 52 20 2d 44 |TUP -DBR|OWSER -D|
|00005300| 4d 45 4e 55 20 2d 44 4d | 4f 55 53 45 20 2d 44 43 |MENU -DM|OUSE -DC|
|00005310| 48 41 4e 47 45 5f 43 4f | 4c 4f 52 20 2d 44 58 4b |HANGE_CO|LOR -DXK|
|00005320| 45 59 53 20 2d 44 44 4f | 5f 4d 45 54 41 4b 45 59 |EYS -DDO|_METAKEY|
|00005330| 20 0a 58 4f 42 4a 20 20 | 3d 20 24 28 4d 45 4e 55 | .XOBJ |= $(MENU|
|00005340| 4f 42 4a 29 20 24 28 4d | 4f 55 53 45 4f 42 4a 29 |OBJ) $(M|OUSEOBJ)|
|00005350| 0a 0a 23 20 42 75 72 72 | 69 74 6f 20 73 74 79 6c |..# Burr|ito styl|
|00005360| 65 2c 20 77 69 74 68 20 | 6a 75 73 74 20 74 68 65 |e, with |just the|
|00005370| 20 42 72 6f 77 73 65 72 | 2e 2e 2e 0a 23 50 52 45 | Browser|....#PRE|
|00005380| 46 53 20 3d 20 2d 44 53 | 54 41 52 54 55 50 20 20 |FS = -DS|TARTUP |
|00005390| 2d 44 42 52 4f 57 53 45 | 52 20 2d 44 4d 4f 55 53 |-DBROWSE|R -DMOUS|
|000053a0| 45 20 2d 44 43 48 41 4e | 47 45 5f 43 4f 4c 4f 52 |E -DCHAN|GE_COLOR|
|000053b0| 20 2d 44 58 4b 45 59 53 | 20 2d 44 44 4f 5f 4d 45 | -DXKEYS| -DDO_ME|
|000053c0| 54 41 4b 45 59 0a 23 58 | 4f 42 4a 20 20 3d 20 24 |TAKEY.#X|OBJ = $|
|000053d0| 28 4d 4f 55 53 45 4f 42 | 4a 29 20 24 28 4d 45 4e |(MOUSEOB|J) $(MEN|
|000053e0| 55 4f 42 4a 29 0a 0a 23 | 20 42 75 72 72 69 74 6f |UOBJ)..#| Burrito|
|000053f0| 20 73 74 79 6c 65 2c 20 | 77 69 74 68 20 6a 75 73 | style, |with jus|
|00005400| 74 20 74 68 65 20 6d 65 | 6e 75 2e 2e 2e 0a 23 50 |t the me|nu....#P|
|00005410| 52 45 46 53 20 3d 20 2d | 44 53 54 41 52 54 55 50 |REFS = -|DSTARTUP|
|00005420| 20 20 2d 44 4d 45 4e 55 | 20 2d 44 4d 4f 55 53 45 | -DMENU| -DMOUSE|
|00005430| 20 2d 44 43 48 41 4e 47 | 45 5f 43 4f 4c 4f 52 20 | -DCHANG|E_COLOR |
|00005440| 2d 44 58 4b 45 59 53 20 | 2d 44 44 4f 5f 4d 45 54 |-DXKEYS |-DDO_MET|
|00005450| 41 4b 45 59 0a 23 58 4f | 42 4a 20 20 3d 20 24 28 |AKEY.#XO|BJ = $(|
|00005460| 4d 4f 55 53 45 4f 42 4a | 29 20 24 28 4d 45 4e 55 |MOUSEOBJ|) $(MENU|
|00005470| 4f 42 4a 29 0a 0a 23 20 | 4d 69 6b 65 27 73 20 66 |OBJ)..# |Mike's f|
|00005480| 61 76 6f 72 69 74 65 20 | 76 65 72 73 69 6f 6e 0a |avorite |version.|
|00005490| 23 50 52 45 46 53 20 3d | 20 2d 44 4d 4f 55 53 45 |#PREFS =| -DMOUSE|
|000054a0| 20 2d 44 42 52 4f 57 53 | 45 52 20 2d 44 4d 4f 44 | -DBROWS|ER -DMOD|
|000054b0| 45 5f 52 45 4e 44 49 54 | 49 4f 4e 3d 30 20 2d 44 |E_RENDIT|ION=0 -D|
|000054c0| 4d 4f 44 45 5f 46 47 3d | 32 20 2d 44 54 4f 47 47 |MODE_FG=|2 -DTOGG|
|000054d0| 4c 45 5f 5a 4f 4f 4d 53 | 20 2d 44 44 4f 5f 4d 45 |LE_ZOOMS| -DDO_ME|
|000054e0| 54 41 4b 45 59 20 2d 44 | 47 4f 53 52 45 43 20 2d |TAKEY -D|GOSREC -|
|000054f0| 44 4d 45 59 4e 0a 23 58 | 4f 42 4a 20 3d 20 24 28 |DMEYN.#X|OBJ = $(|
|00005500| 4d 4f 55 53 45 4f 42 4a | 29 20 24 28 4d 45 4e 55 |MOUSEOBJ|) $(MENU|
|00005510| 4f 42 4a 29 0a 0a 23 20 | 41 62 73 6f 6c 75 74 65 |OBJ)..# |Absolute|
|00005520| 6c 79 20 62 61 72 65 2d | 62 6f 6e 65 73 20 65 64 |ly bare-|bones ed|
|00005530| 69 74 6f 72 20 28 7e 34 | 39 4b 20 77 69 74 68 20 |itor (~4|9K with |
|00005540| 4d 61 6e 78 20 73 6d 61 | 6c 6c 20 6d 6f 64 65 6c |Manx sma|ll model|
|00005550| 29 0a 23 50 52 45 46 53 | 20 3d 20 2d 44 44 4f 5f |).#PREFS| = -DDO_|
|00005560| 4d 45 54 41 4b 45 59 0a | 23 58 4f 42 4a 20 20 3d |METAKEY.|#XOBJ =|
|00005570| 0a 0a 43 46 4c 41 47 53 | 20 3d 09 2d 4f 20 2d 49 |..CFLAGS| =.-O -I|
|00005580| 24 28 54 54 59 44 49 52 | 29 20 2d 49 24 28 53 59 |$(TTYDIR|) -I$(SY|
|00005590| 53 44 49 52 29 20 24 28 | 44 45 42 55 47 46 4c 41 |SDIR) $(|DEBUGFLA|
|000055a0| 47 29 20 24 28 50 52 45 | 46 53 29 0a 0a 45 58 45 |G) $(PRE|FS)..EXE|
|000055b0| 46 49 4c 45 20 3d 09 6d | 67 0a 43 4f 4d 31 09 3d |FILE =.m|g.COM1.=|
|000055c0| 20 62 61 73 69 63 2e 6f | 20 62 75 66 66 65 72 2e | basic.o| buffer.|
|000055d0| 6f 20 63 69 6e 66 6f 2e | 6f 20 64 69 73 70 6c 61 |o cinfo.|o displa|
|000055e0| 79 2e 6f 20 65 63 68 6f | 2e 6f 20 65 78 74 65 6e |y.o echo|.o exten|
|000055f0| 64 2e 6f 20 66 69 6c 65 | 2e 6f 20 6b 62 64 2e 6f |d.o file|.o kbd.o|
|00005600| 0a 43 4f 4d 32 09 3d 20 | 6c 69 6e 65 2e 6f 20 6d |.COM2.= |line.o m|
|00005610| 61 69 6e 2e 6f 20 6d 61 | 74 63 68 2e 6f 20 72 61 |ain.o ma|tch.o ra|
|00005620| 6e 64 6f 6d 2e 6f 20 72 | 65 67 69 6f 6e 2e 6f 20 |ndom.o r|egion.o |
|00005630| 73 65 61 72 63 68 2e 6f | 20 73 79 6d 62 6f 6c 2e |search.o| symbol.|
|00005640| 6f 20 76 65 72 73 69 6f | 6e 2e 6f 0a 43 4f 4d 33 |o versio|n.o.COM3|
|00005650| 09 3d 20 77 69 6e 64 6f | 77 2e 6f 20 70 61 72 61 |.= windo|w.o para|
|00005660| 67 72 61 70 68 2e 6f 20 | 70 72 65 66 69 78 2e 6f |graph.o |prefix.o|
|00005670| 20 77 6f 72 64 2e 6f 0a | 54 54 59 4f 42 4a 09 3d | word.o.|TTYOBJ.=|
|00005680| 20 63 6f 6e 73 6f 6c 65 | 2e 6f 20 74 74 79 2e 6f | console|.o tty.o|
|00005690| 20 74 74 79 69 6f 2e 6f | 20 74 74 79 6b 62 64 2e | ttyio.o| ttykbd.|
|000056a0| 6f 0a 53 59 53 4f 42 4a | 09 3d 20 66 69 6c 65 69 |o.SYSOBJ|.= filei|
|000056b0| 6f 2e 6f 20 73 6c 65 65 | 70 2e 6f 20 73 70 61 77 |o.o slee|p.o spaw|
|000056c0| 6e 2e 6f 0a 4f 42 4a 09 | 3d 20 63 6f 6d 6c 69 62 |n.o.OBJ.|= comlib|
|000056d0| 31 2e 6f 20 63 6f 6d 6c | 69 62 32 2e 6f 20 63 6f |1.o coml|ib2.o co|
|000056e0| 6d 6c 69 62 33 2e 6f 20 | 74 74 79 6c 69 62 2e 6f |mlib3.o |ttylib.o|
|000056f0| 20 73 79 73 6c 69 62 2e | 6f 20 24 28 58 4f 42 4a | syslib.|o $(XOBJ|
|00005700| 29 0a 0a 24 28 45 58 45 | 46 49 4c 45 29 20 3a 09 |)..$(EXE|FILE) :.|
|00005710| 24 28 4f 42 4a 29 0a 09 | 09 24 28 43 43 29 20 2d |$(OBJ)..|.$(CC) -|
|00005720| 6f 20 24 28 45 58 45 46 | 49 4c 45 29 20 24 28 4f |o $(EXEF|ILE) $(O|
|00005730| 42 4a 29 0a 0a 63 6f 6d | 6c 69 62 31 2e 6f 20 3a |BJ)..com|lib1.o :|
|00005740| 09 24 28 43 4f 4d 31 29 | 0a 09 09 6a 6f 69 6e 20 |.$(COM1)|...join |
|00005750| 24 28 43 4f 4d 31 29 20 | 61 73 20 63 6f 6d 6c 69 |$(COM1) |as comli|
|00005760| 62 31 2e 6f 0a 0a 63 6f | 6d 6c 69 62 32 2e 6f 20 |b1.o..co|mlib2.o |
|00005770| 3a 09 24 28 43 4f 4d 32 | 29 0a 09 09 6a 6f 69 6e |:.$(COM2|)...join|
|00005780| 20 24 28 43 4f 4d 32 29 | 20 61 73 20 63 6f 6d 6c | $(COM2)| as coml|
|00005790| 69 62 32 2e 6f 0a 0a 63 | 6f 6d 6c 69 62 33 2e 6f |ib2.o..c|omlib3.o|
|000057a0| 20 3a 09 24 28 43 4f 4d | 33 29 0a 09 09 6a 6f 69 | :.$(COM|3)...joi|
|000057b0| 6e 20 24 28 43 4f 4d 33 | 29 20 61 73 20 63 6f 6d |n $(COM3|) as com|
|000057c0| 6c 69 62 33 2e 6f 0a 0a | 74 74 79 6c 69 62 2e 6f |lib3.o..|ttylib.o|
|000057d0| 20 3a 09 24 28 54 54 59 | 4f 42 4a 29 0a 09 09 6a | :.$(TTY|OBJ)...j|
|000057e0| 6f 69 6e 20 24 28 54 54 | 59 4f 42 4a 29 20 61 73 |oin $(TT|YOBJ) as|
|000057f0| 20 74 74 79 6c 69 62 2e | 6f 0a 0a 73 79 73 6c 69 | ttylib.|o..sysli|
|00005800| 62 2e 6f 20 3a 09 24 28 | 53 59 53 4f 42 4a 29 0a |b.o :.$(|SYSOBJ).|
|00005810| 09 09 6a 6f 69 6e 20 24 | 28 53 59 53 4f 42 4a 29 |..join $|(SYSOBJ)|
|00005820| 20 61 73 20 73 79 73 6c | 69 62 2e 6f 0a 0a 62 61 | as sysl|ib.o..ba|
|00005830| 73 69 63 2e 6f 20 3a 09 | 62 61 73 69 63 2e 63 20 |sic.o :.|basic.c |
|00005840| 24 28 49 4e 43 53 29 0a | 09 09 24 28 43 43 29 20 |$(INCS).|..$(CC) |
|00005850| 2d 63 20 24 28 43 46 4c | 41 47 53 29 20 62 61 73 |-c $(CFL|AGS) bas|
|00005860| 69 63 2e 63 0a 0a 62 75 | 66 66 65 72 2e 6f 20 3a |ic.c..bu|ffer.o :|
|00005870| 09 62 75 66 66 65 72 2e | 63 20 24 28 49 4e 43 53 |.buffer.|c $(INCS|
|00005880| 29 0a 09 09 24 28 43 43 | 29 20 2d 63 20 24 28 43 |)...$(CC|) -c $(C|
|00005890| 46 4c 41 47 53 29 20 62 | 75 66 66 65 72 2e 63 0a |FLAGS) b|uffer.c.|
|000058a0| 0a 63 69 6e 66 6f 2e 6f | 20 3a 09 63 69 6e 66 6f |.cinfo.o| :.cinfo|
|000058b0| 2e 63 20 24 28 49 4e 43 | 53 29 0a 09 09 24 28 43 |.c $(INC|S)...$(C|
|000058c0| 43 29 20 2d 63 20 24 28 | 43 46 4c 41 47 53 29 20 |C) -c $(|CFLAGS) |
|000058d0| 63 69 6e 66 6f 2e 63 0a | 0a 64 69 73 70 6c 61 79 |cinfo.c.|.display|
|000058e0| 2e 6f 20 3a 09 64 69 73 | 70 6c 61 79 2e 63 20 24 |.o :.dis|play.c $|
|000058f0| 28 49 4e 43 53 29 0a 09 | 09 24 28 43 43 29 20 2d |(INCS)..|.$(CC) -|
|00005900| 63 20 24 28 43 46 4c 41 | 47 53 29 20 64 69 73 70 |c $(CFLA|GS) disp|
|00005910| 6c 61 79 2e 63 0a 0a 65 | 63 68 6f 2e 6f 20 3a 09 |lay.c..e|cho.o :.|
|00005920| 65 63 68 6f 2e 63 20 24 | 28 49 4e 43 53 29 0a 09 |echo.c $|(INCS)..|
|00005930| 09 24 28 43 43 29 20 2d | 63 20 24 28 43 46 4c 41 |.$(CC) -|c $(CFLA|
|00005940| 47 53 29 20 65 63 68 6f | 2e 63 0a 0a 65 78 74 65 |GS) echo|.c..exte|
|00005950| 6e 64 2e 6f 20 3a 09 65 | 78 74 65 6e 64 2e 63 20 |nd.o :.e|xtend.c |
|00005960| 24 28 49 4e 43 53 29 0a | 09 09 24 28 43 43 29 20 |$(INCS).|..$(CC) |
|00005970| 2d 63 20 24 28 43 46 4c | 41 47 53 29 20 65 78 74 |-c $(CFL|AGS) ext|
|00005980| 65 6e 64 2e 63 0a 0a 66 | 69 6c 65 2e 6f 20 3a 09 |end.c..f|ile.o :.|
|00005990| 66 69 6c 65 2e 63 20 24 | 28 49 4e 43 53 29 0a 09 |file.c $|(INCS)..|
|000059a0| 09 24 28 43 43 29 20 2d | 63 20 24 28 43 46 4c 41 |.$(CC) -|c $(CFLA|
|000059b0| 47 53 29 20 66 69 6c 65 | 2e 63 0a 0a 6b 62 64 2e |GS) file|.c..kbd.|
|000059c0| 6f 20 3a 09 09 6b 62 64 | 2e 63 20 24 28 49 4e 43 |o :..kbd|.c $(INC|
|000059d0| 53 29 0a 09 09 24 28 43 | 43 29 20 2d 63 20 24 28 |S)...$(C|C) -c $(|
|000059e0| 43 46 4c 41 47 53 29 20 | 6b 62 64 2e 63 0a 0a 6c |CFLAGS) |kbd.c..l|
|000059f0| 69 6e 65 2e 6f 20 3a 09 | 6c 69 6e 65 2e 63 20 24 |ine.o :.|line.c $|
|00005a00| 28 49 4e 43 53 29 0a 09 | 09 24 28 43 43 29 20 2d |(INCS)..|.$(CC) -|
|00005a10| 63 20 24 28 43 46 4c 41 | 47 53 29 20 6c 69 6e 65 |c $(CFLA|GS) line|
|00005a20| 2e 63 0a 0a 6d 61 74 63 | 68 2e 6f 20 3a 09 6d 61 |.c..matc|h.o :.ma|
|00005a30| 74 63 68 2e 63 20 24 28 | 49 4e 43 53 29 0a 09 09 |tch.c $(|INCS)...|
|00005a40| 24 28 43 43 29 20 2d 63 | 20 24 28 43 46 4c 41 47 |$(CC) -c| $(CFLAG|
|00005a50| 53 29 20 6d 61 74 63 68 | 2e 63 0a 0a 70 72 65 66 |S) match|.c..pref|
|00005a60| 69 78 2e 6f 20 3a 09 70 | 72 65 66 69 78 2e 63 20 |ix.o :.p|refix.c |
|00005a70| 24 28 49 4e 43 53 29 0a | 09 09 24 28 43 43 29 20 |$(INCS).|..$(CC) |
|00005a80| 2d 63 20 24 28 43 46 4c | 41 47 53 29 20 70 72 65 |-c $(CFL|AGS) pre|
|00005a90| 66 69 78 2e 63 0a 0a 70 | 61 72 61 67 72 61 70 68 |fix.c..p|aragraph|
|00005aa0| 2e 6f 20 3a 09 70 61 72 | 61 67 72 61 70 68 2e 63 |.o :.par|agraph.c|
|00005ab0| 20 24 28 49 4e 43 53 29 | 0a 09 09 24 28 43 43 29 | $(INCS)|...$(CC)|
|00005ac0| 20 2d 63 20 24 28 43 46 | 4c 41 47 53 29 20 70 61 | -c $(CF|LAGS) pa|
|00005ad0| 72 61 67 72 61 70 68 2e | 63 0a 0a 6d 61 69 6e 2e |ragraph.|c..main.|
|00005ae0| 6f 20 3a 09 6d 61 69 6e | 2e 63 20 24 28 49 4e 43 |o :.main|.c $(INC|
|00005af0| 53 29 0a 09 09 24 28 43 | 43 29 20 2d 63 20 24 28 |S)...$(C|C) -c $(|
|00005b00| 43 46 4c 41 47 53 29 20 | 6d 61 69 6e 2e 63 0a 0a |CFLAGS) |main.c..|
|00005b10| 72 61 6e 64 6f 6d 2e 6f | 20 3a 09 72 61 6e 64 6f |random.o| :.rando|
|00005b20| 6d 2e 63 20 24 28 49 4e | 43 53 29 0a 09 09 24 28 |m.c $(IN|CS)...$(|
|00005b30| 43 43 29 20 2d 63 20 24 | 28 43 46 4c 41 47 53 29 |CC) -c $|(CFLAGS)|
|00005b40| 20 72 61 6e 64 6f 6d 2e | 63 0a 0a 72 65 67 69 6f | random.|c..regio|
|00005b50| 6e 2e 6f 20 3a 09 72 65 | 67 69 6f 6e 2e 63 20 24 |n.o :.re|gion.c $|
|00005b60| 28 49 4e 43 53 29 0a 09 | 09 24 28 43 43 29 20 2d |(INCS)..|.$(CC) -|
|00005b70| 63 20 24 28 43 46 4c 41 | 47 53 29 20 72 65 67 69 |c $(CFLA|GS) regi|
|00005b80| 6f 6e 2e 63 0a 0a 73 65 | 61 72 63 68 2e 6f 20 3a |on.c..se|arch.o :|
|00005b90| 09 73 65 61 72 63 68 2e | 63 20 24 28 49 4e 43 53 |.search.|c $(INCS|
|00005ba0| 29 0a 09 09 24 28 43 43 | 29 20 2d 63 20 24 28 43 |)...$(CC|) -c $(C|
|00005bb0| 46 4c 41 47 53 29 20 73 | 65 61 72 63 68 2e 63 0a |FLAGS) s|earch.c.|
|00005bc0| 0a 73 79 6d 62 6f 6c 2e | 6f 20 3a 09 73 79 6d 62 |.symbol.|o :.symb|
|00005bd0| 6f 6c 2e 63 20 24 28 49 | 4e 43 53 29 0a 09 09 24 |ol.c $(I|NCS)...$|
|00005be0| 28 43 43 29 20 2d 63 20 | 24 28 43 46 4c 41 47 53 |(CC) -c |$(CFLAGS|
|00005bf0| 29 20 73 79 6d 62 6f 6c | 2e 63 0a 0a 76 65 72 73 |) symbol|.c..vers|
|00005c00| 69 6f 6e 2e 6f 20 3a 09 | 76 65 72 73 69 6f 6e 2e |ion.o :.|version.|
|00005c10| 63 20 24 28 49 4e 43 53 | 29 0a 09 09 24 28 43 43 |c $(INCS|)...$(CC|
|00005c20| 29 20 2d 63 20 24 28 43 | 46 4c 41 47 53 29 20 76 |) -c $(C|FLAGS) v|
|00005c30| 65 72 73 69 6f 6e 2e 63 | 0a 0a 77 69 6e 64 6f 77 |ersion.c|..window|
|00005c40| 2e 6f 20 3a 09 77 69 6e | 64 6f 77 2e 63 20 24 28 |.o :.win|dow.c $(|
|00005c50| 49 4e 43 53 29 0a 09 09 | 24 28 43 43 29 20 2d 63 |INCS)...|$(CC) -c|
|00005c60| 20 24 28 43 46 4c 41 47 | 53 29 20 77 69 6e 64 6f | $(CFLAG|S) windo|
|00005c70| 77 2e 63 0a 0a 77 6f 72 | 64 2e 6f 20 3a 09 77 6f |w.c..wor|d.o :.wo|
|00005c80| 72 64 2e 63 20 24 28 49 | 4e 43 53 29 0a 09 09 24 |rd.c $(I|NCS)...$|
|00005c90| 28 43 43 29 20 2d 63 20 | 24 28 43 46 4c 41 47 53 |(CC) -c |$(CFLAGS|
|00005ca0| 29 20 77 6f 72 64 2e 63 | 0a 0a 63 6f 6e 73 6f 6c |) word.c|..consol|
|00005cb0| 65 2e 6f 20 3a 09 24 28 | 54 54 59 44 49 52 29 2f |e.o :.$(|TTYDIR)/|
|00005cc0| 63 6f 6e 73 6f 6c 65 2e | 63 20 24 28 49 4e 43 53 |console.|c $(INCS|
|00005cd0| 29 0a 09 09 24 28 43 43 | 29 20 2d 63 20 24 28 43 |)...$(CC|) -c $(C|
|00005ce0| 46 4c 41 47 53 29 20 24 | 28 54 54 59 44 49 52 29 |FLAGS) $|(TTYDIR)|
|00005cf0| 2f 63 6f 6e 73 6f 6c 65 | 2e 63 0a 0a 6d 65 6e 75 |/console|.c..menu|
|00005d00| 73 74 61 63 6b 2e 6f 20 | 3a 09 24 28 54 54 59 44 |stack.o |:.$(TTYD|
|00005d10| 49 52 29 2f 6d 65 6e 75 | 73 74 61 63 6b 2e 63 20 |IR)/menu|stack.c |
|00005d20| 24 28 49 4e 43 53 29 0a | 09 09 24 28 43 43 29 20 |$(INCS).|..$(CC) |
|00005d30| 2d 63 20 24 28 43 46 4c | 41 47 53 29 20 24 28 54 |-c $(CFL|AGS) $(T|
|00005d40| 54 59 44 49 52 29 2f 6d | 65 6e 75 73 74 61 63 6b |TYDIR)/m|enustack|
|00005d50| 2e 63 0a 0a 74 74 79 2e | 6f 20 3a 09 09 24 28 54 |.c..tty.|o :..$(T|
|00005d60| 54 59 44 49 52 29 2f 74 | 74 79 2e 63 20 24 28 49 |TYDIR)/t|ty.c $(I|
|00005d70| 4e 43 53 29 0a 09 09 24 | 28 43 43 29 20 2d 63 20 |NCS)...$|(CC) -c |
|00005d80| 24 28 43 46 4c 41 47 53 | 29 20 24 28 54 54 59 44 |$(CFLAGS|) $(TTYD|
|00005d90| 49 52 29 2f 74 74 79 2e | 63 0a 0a 74 74 79 69 6f |IR)/tty.|c..ttyio|
|00005da0| 2e 6f 20 3a 09 24 28 54 | 54 59 44 49 52 29 2f 74 |.o :.$(T|TYDIR)/t|
|00005db0| 74 79 69 6f 2e 63 20 24 | 28 49 4e 43 53 29 0a 09 |tyio.c $|(INCS)..|
|00005dc0| 09 24 28 43 43 29 20 2d | 63 20 24 28 43 46 4c 41 |.$(CC) -|c $(CFLA|
|00005dd0| 47 53 29 20 24 28 54 54 | 59 44 49 52 29 2f 74 74 |GS) $(TT|YDIR)/tt|
|00005de0| 79 69 6f 2e 63 0a 0a 74 | 74 79 6b 62 64 2e 6f 20 |yio.c..t|tykbd.o |
|00005df0| 3a 09 24 28 54 54 59 44 | 49 52 29 2f 74 74 79 6b |:.$(TTYD|IR)/ttyk|
|00005e00| 62 64 2e 63 20 24 28 49 | 4e 43 53 29 0a 09 09 24 |bd.c $(I|NCS)...$|
|00005e10| 28 43 43 29 20 2d 63 20 | 24 28 43 46 4c 41 47 53 |(CC) -c |$(CFLAGS|
|00005e20| 29 20 24 28 54 54 59 44 | 49 52 29 2f 74 74 79 6b |) $(TTYD|IR)/ttyk|
|00005e30| 62 64 2e 63 0a 0a 0a 74 | 74 79 6d 6f 75 73 65 2e |bd.c...t|tymouse.|
|00005e40| 6f 20 3a 09 24 28 54 54 | 59 44 49 52 29 2f 74 74 |o :.$(TT|YDIR)/tt|
|00005e50| 79 6d 6f 75 73 65 2e 63 | 20 24 28 49 4e 43 53 29 |ymouse.c| $(INCS)|
|00005e60| 0a 09 09 24 28 43 43 29 | 20 2d 63 20 24 28 43 46 |...$(CC)| -c $(CF|
|00005e70| 4c 41 47 53 29 20 24 28 | 54 54 59 44 49 52 29 2f |LAGS) $(|TTYDIR)/|
|00005e80| 74 74 79 6d 6f 75 73 65 | 2e 63 0a 0a 74 74 79 6d |ttymouse|.c..ttym|
|00005e90| 65 6e 75 2e 6f 20 3a 09 | 24 28 54 54 59 44 49 52 |enu.o :.|$(TTYDIR|
|00005ea0| 29 2f 74 74 79 6d 65 6e | 75 2e 63 20 24 28 49 4e |)/ttymen|u.c $(IN|
|00005eb0| 43 53 29 0a 09 09 24 28 | 43 43 29 20 2d 63 20 24 |CS)...$(|CC) -c $|
|00005ec0| 28 43 46 4c 41 47 53 29 | 20 24 28 54 54 59 44 49 |(CFLAGS)| $(TTYDI|
|00005ed0| 52 29 2f 74 74 79 6d 65 | 6e 75 2e 63 0a 61 62 6f |R)/ttyme|nu.c.abo|
|00005ee0| 72 74 2e 6f 20 3a 09 24 | 28 53 59 53 44 49 52 29 |rt.o :.$|(SYSDIR)|
|00005ef0| 2f 61 62 6f 72 74 2e 63 | 20 24 28 49 4e 43 53 29 |/abort.c| $(INCS)|
|00005f00| 0a 09 09 24 28 43 43 29 | 20 2d 63 20 24 28 43 46 |...$(CC)| -c $(CF|
|00005f10| 4c 41 47 53 29 20 24 28 | 53 59 53 44 49 52 29 2f |LAGS) $(|SYSDIR)/|
|00005f20| 61 62 6f 72 74 2e 63 0a | 0a 66 69 6c 65 69 6f 2e |abort.c.|.fileio.|
|00005f30| 6f 20 3a 09 24 28 53 59 | 53 44 49 52 29 2f 66 69 |o :.$(SY|SDIR)/fi|
|00005f40| 6c 65 69 6f 2e 63 20 24 | 28 49 4e 43 53 29 0a 09 |leio.c $|(INCS)..|
|00005f50| 09 24 28 43 43 29 20 2d | 63 20 24 28 43 46 4c 41 |.$(CC) -|c $(CFLA|
|00005f60| 47 53 29 20 24 28 53 59 | 53 44 49 52 29 2f 66 69 |GS) $(SY|SDIR)/fi|
|00005f70| 6c 65 69 6f 2e 63 0a 0a | 73 6c 65 65 70 2e 6f 20 |leio.c..|sleep.o |
|00005f80| 3a 09 24 28 53 59 53 44 | 49 52 29 2f 73 6c 65 65 |:.$(SYSD|IR)/slee|
|00005f90| 70 2e 63 20 24 28 49 4e | 43 53 29 0a 09 09 24 28 |p.c $(IN|CS)...$(|
|00005fa0| 43 43 29 20 2d 63 20 24 | 28 43 46 4c 41 47 53 29 |CC) -c $|(CFLAGS)|
|00005fb0| 20 24 28 53 59 53 44 49 | 52 29 2f 73 6c 65 65 70 | $(SYSDI|R)/sleep|
|00005fc0| 2e 63 0a 0a 73 70 61 77 | 6e 2e 6f 20 3a 09 24 28 |.c..spaw|n.o :.$(|
|00005fd0| 53 59 53 44 49 52 29 2f | 73 70 61 77 6e 2e 63 20 |SYSDIR)/|spawn.c |
|00005fe0| 24 28 49 4e 43 53 29 0a | 09 09 24 28 43 43 29 20 |$(INCS).|..$(CC) |
|00005ff0| 2d 63 20 24 28 43 46 4c | 41 47 53 29 20 24 28 53 |-c $(CFL|AGS) $(S|
|00006000| 59 53 44 49 52 29 2f 73 | 70 61 77 6e 2e 63 0a 53 |YSDIR)/s|pawn.c.S|
|00006010| 48 41 52 5f 45 4f 46 0a | 66 69 20 23 20 65 6e 64 |HAR_EOF.|fi # end|
|00006020| 20 6f 66 20 6f 76 65 72 | 77 72 69 74 69 6e 67 20 | of over|writing |
|00006030| 63 68 65 63 6b 0a 69 66 | 20 74 65 73 74 20 2d 66 |check.if| test -f|
|00006040| 20 27 73 79 73 2f 61 6d | 69 67 61 2f 4d 61 6b 65 | 'sys/am|iga/Make|
|00006050| 66 69 6c 65 2e 4d 41 4e | 58 27 0a 74 68 65 6e 0a |file.MAN|X'.then.|
|00006060| 09 65 63 68 6f 20 73 68 | 61 72 3a 20 77 69 6c 6c |.echo sh|ar: will|
|00006070| 20 6e 6f 74 20 6f 76 65 | 72 2d 77 72 69 74 65 20 | not ove|r-write |
|00006080| 65 78 69 73 74 69 6e 67 | 20 66 69 6c 65 20 22 27 |existing| file "'|
|00006090| 73 79 73 2f 61 6d 69 67 | 61 2f 4d 61 6b 65 66 69 |sys/amig|a/Makefi|
|000060a0| 6c 65 2e 4d 41 4e 58 27 | 22 0a 65 6c 73 65 0a 63 |le.MANX'|".else.c|
|000060b0| 61 74 20 3c 3c 20 5c 53 | 48 41 52 5f 45 4f 46 20 |at << \S|HAR_EOF |
|000060c0| 3e 20 27 73 79 73 2f 61 | 6d 69 67 61 2f 4d 61 6b |> 'sys/a|miga/Mak|
|000060d0| 65 66 69 6c 65 2e 4d 41 | 4e 58 27 0a 23 0a 23 20 |efile.MA|NX'.#.# |
|000060e0| 4d 61 6b 65 66 69 6c 65 | 20 66 6f 72 20 41 6d 69 |Makefile| for Ami|
|000060f0| 67 61 20 4d 69 63 72 6f | 47 4e 55 6d 61 63 73 2c |ga Micro|GNUmacs,|
|00006100| 20 75 73 69 6e 67 20 4d | 61 6e 78 20 73 6d 61 6c | using M|anx smal|
|00006110| 6c 20 6d 6f 64 65 6c 2e | 0a 23 0a 23 09 54 68 69 |l model.|.#.#.Thi|
|00006120| 73 20 4d 61 6b 65 66 69 | 6c 65 20 73 68 6f 75 6c |s Makefi|le shoul|
|00006130| 64 20 62 65 20 65 78 65 | 63 75 74 65 64 20 69 6e |d be exe|cuted in|
|00006140| 20 74 68 65 20 6d 61 69 | 6e 20 45 6d 61 63 73 20 | the mai|n Emacs |
|00006150| 64 69 72 65 63 74 6f 72 | 79 2e 0a 23 0a 23 20 53 |director|y..#.# S|
|00006160| 79 73 74 65 6d 2d 64 65 | 70 65 6e 64 65 6e 74 20 |ystem-de|pendent |
|00006170| 63 6f 6e 64 69 74 69 6f | 6e 61 6c 20 63 6f 6d 70 |conditio|nal comp|
|00006180| 69 6c 61 74 69 6f 6e 20 | 70 6f 73 73 69 62 69 6c |ilation |possibil|
|00006190| 69 74 69 65 73 3a 0a 23 | 0a 23 09 56 31 31 09 09 |ities:.#|.#.V11..|
|000061a0| 2d 2d 20 6d 75 73 74 20 | 62 65 20 64 65 66 69 6e |-- must |be defin|
|000061b0| 65 64 20 66 6f 72 20 74 | 68 65 20 65 64 69 74 6f |ed for t|he edito|
|000061c0| 72 20 74 6f 20 65 69 74 | 68 65 72 20 72 75 6e 20 |r to eit|her run |
|000061d0| 6f 6e 0a 23 09 09 09 20 | 20 20 6f 72 20 63 6f 6d |on.#... | or com|
|000061e0| 70 69 6c 65 20 6f 6e 20 | 61 20 76 65 72 73 69 6f |pile on |a versio|
|000061f0| 6e 20 31 2e 31 20 41 6d | 69 67 61 44 4f 53 20 73 |n 1.1 Am|igaDOS s|
|00006200| 79 73 74 65 6d 2e 0a 23 | 09 09 09 20 20 20 49 74 |ystem..#|... It|
|00006210| 20 6d 61 69 6e 6c 79 20 | 77 61 72 64 73 20 61 67 | mainly |wards ag|
|00006220| 61 69 6e 73 74 20 62 75 | 67 73 20 69 6e 20 74 68 |ainst bu|gs in th|
|00006230| 65 20 31 2e 31 20 52 4f | 4d 0a 23 09 09 09 20 20 |e 1.1 RO|M.#... |
|00006240| 20 4b 65 72 6e 65 6c 2e | 0a 23 0a 23 09 53 54 41 | Kernel.|.#.#.STA|
|00006250| 52 54 55 50 09 09 2d 2d | 20 69 66 20 64 65 66 69 |RTUP..--| if defi|
|00006260| 6e 65 64 2c 20 63 6f 64 | 65 20 66 6f 72 20 75 73 |ned, cod|e for us|
|00006270| 69 6e 67 20 61 20 73 74 | 61 72 74 75 70 20 66 69 |ing a st|artup fi|
|00006280| 6c 65 0a 23 09 09 09 20 | 20 20 69 73 20 69 6e 63 |le.#... | is inc|
|00006290| 6c 75 64 65 64 2e 20 20 | 54 68 69 73 20 69 73 20 |luded. |This is |
|000062a0| 68 61 6e 64 79 20 66 6f | 72 20 66 6f 6c 6b 73 20 |handy fo|r folks |
|000062b0| 77 68 6f 0a 23 09 09 09 | 20 20 20 77 6f 6e 27 74 |who.#...| won't|
|000062c0| 20 62 65 20 61 62 6c 65 | 20 74 6f 20 68 61 63 6b | be able| to hack|
|000062d0| 20 74 68 65 20 65 64 69 | 74 6f 72 20 74 6f 20 74 | the edi|tor to t|
|000062e0| 68 65 69 72 0a 23 09 09 | 09 20 20 20 74 61 73 74 |heir.#..|. tast|
|000062f0| 65 2e 0a 23 0a 23 09 4d | 45 4e 55 09 09 2d 2d 20 |e..#.#.M|ENU..-- |
|00006300| 69 66 20 64 65 66 69 6e | 65 64 2c 20 49 6e 74 75 |if defin|ed, Intu|
|00006310| 69 74 69 6f 6e 20 6d 65 | 6e 75 20 73 65 6c 65 63 |ition me|nu selec|
|00006320| 74 69 6f 6e 20 69 73 0a | 23 09 09 09 20 20 20 65 |tion is.|#... e|
|00006330| 6e 61 62 6c 65 64 2e 20 | 20 49 66 20 79 6f 75 20 |nabled. | If you |
|00006340| 23 64 65 66 69 6e 65 20 | 74 68 69 73 2c 20 74 68 |#define |this, th|
|00006350| 65 20 58 4f 42 4a 20 6d | 61 63 72 6f 0a 23 09 09 |e XOBJ m|acro.#..|
|00006360| 09 20 20 20 6d 75 73 74 | 20 63 6f 6e 74 61 69 6e |. must| contain|
|00006370| 20 24 28 4d 45 4e 55 4f | 42 4a 29 2e 0a 23 0a 23 | $(MENUO|BJ)..#.#|
|00006380| 09 42 52 4f 57 53 45 52 | 09 09 2d 2d 20 42 52 4f |.BROWSER|..-- BRO|
|00006390| 57 53 45 52 20 75 73 65 | 73 20 74 68 65 20 41 6d |WSER use|s the Am|
|000063a0| 69 67 61 20 6d 65 6e 75 | 20 74 6f 20 70 72 65 73 |iga menu| to pres|
|000063b0| 65 6e 74 20 61 20 4d 45 | 4e 55 20 6f 66 0a 23 09 |ent a ME|NU of.#.|
|000063c0| 09 09 20 20 20 66 69 6c | 65 73 2e 20 53 65 6c 65 |.. fil|es. Sele|
|000063d0| 63 74 69 6e 67 20 61 20 | 64 69 72 65 63 74 6f 72 |cting a |director|
|000063e0| 79 20 65 6e 74 72 79 20 | 28 65 6e 64 73 20 77 69 |y entry |(ends wi|
|000063f0| 74 68 20 61 20 2f 29 0a | 23 09 09 09 20 20 20 6d |th a /).|#... m|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.